ANTICHAT - Показать сообщение отдельно - combo.pl или проблема парсинга /ect/passwd

Сегодня понадобилось отпарсить довольно большой /ect/passwd .Решил заюзать скрипт combo.pl от Forb'a
Но не тут то было)
Парсинг проходит нормально,но выходной файл имеет следущий вид:

Код:

root:root квадратики shutdown:shutdown

И т.д..
BrutusA2 как комбо лист не воспринемает.
И так:

Код:

./combo.pl shadow.txt 1.txt

не так:

Код:

./combo.pl shadow.txt   pwds

Мож у кого есть другой парсер или совет)
Код combo.pl

Код:

#!/usr/bin/perl

exit print "Usage $0 <infile> <outfile>\n" unless $ARGV[1];

$goodshell='sh';
open(IN,"$ARGV[0]");
open(OUT,">$ARGV[1]");
while(<IN>) {
chomp;
($u,@undef)=split ':';
if (defined($goodshell)) {
if ($undef[(scalar $undef)-1]=~/$goodshell/) {
print OUT "$u:$u\n";
}
} else {
print OUT "$u:$u\n";
}
}
close(IN);
close(OUT);