Все работает отлично!

или мне снять видео как работает скрипт ? =\

запускайте в локалке с установленным Active Perl

если венда то

c:\perl.exe cheker.pl (создав предварительно 3 файла good.txt bad.txt accounts.txt)

__________________
Никогда не бойся делать то, что ты не умеешь. Помни, ковчег был построен любителем. "Титаник" - проффесионалами.