Тогда ты явно сайтом ошибсяМда...я тут ничерта не понял..
Тогда ты явно сайтом ошибсяМда...я тут ничерта не понял..
А обойти ее можно только изменив права на файл (то есть заиметь доступ к фтп)...там защита от просмотра.
#!/usr/bin/perl
$in=$ARGV[0];
$out=$ARGV[1]; ## определим параметры скрипта
exit print "Use $0 $in $out\n" unless ($out);
open(IN, "$in");
open(OUT, ">out");
while(<IN>){
chomp;
if (~/sh$/){ ## запишем только валидные аккаунты
($u,@udef)=split ":";
print OUT "$u:$u\n"; ## В виде пары login:login
}
}
close(IN);
close(OUT);