op en (fi,"bd") || die $!;
while (<fi>) { s/\'//g;
($login,$hash,$hz)=(split(",",$_))[4,5,46];
print "$login:$hash:".substr($hz,0,-3)."\n";
}
close(fi);
Последний раз редактировалось valiko; 03.03.2007 в 05:08..
Причина: "open" фильтруется
Блин в проге не в рублюсь . Мне вот надо из этого 6218:6e316dbbf46088d1596a1f7f7136a636:sLC;]:20041989: оставить тока 20041989 что мне надо указать в проге чтобы это сделать?