Dark Вот скрипт:
#!usr/local/bin/perl
#Filework
$fname = 'test1PART.txt';
open PASS, "<$fname" || die "Ôàéë íå íàéäåí!";
while(<PASS>)
{($login, $pass, $uid, $gid, $name, $home_dir, $shell)= split('!');}
print $login;
print $pass;
print $uid;
print $gid;
close(PASS);
куда вписать строку chmod +x *.cgi