on 4/30/02 4:28 AM, [EMAIL PROTECTED] purportedly said:
> The list is in a file called "france" and contains users name like:
>
> miko
> martha
>
> The file to control is the /etc/passwd:
>
> miko:Sn83kdmcsd4ee:816:1005:MirceaKovari:/tmp:/bin/selfa
> nikol:Sn83kdmcsd4ee:816:1005:NiklaOlman:/tm
Ok, how about this (again untested code!)
my %list;
my $listfile = 'france';
my $outfile = 'output';
my $file = '/etc/passwd';
open(OUT, ">$outfile") || die "cannot open $outfile: $!";
open(LIST, $listfile) || die "cannot open $listfile: $!";
while()
{
my $line = $_;
chomp $line;
$li
