Форум АНТИЧАТ - Показать сообщение отдельно

Сбор всех хэшей и паролей к ним такого формата:

Код:

хэш:пароль

*Пароль и хэш не должны быть выделенный никаким цветом , только указанный формат

Код:

use strict; 
use warnings;
use LWP::Simple;
my ( $res,@a );
for( my $k=1;$k<168;$k++ )
{
    $res = get( "http://forum.antichat.ru/threadnav44362-".$k."-10.html" );
    @a = $res=~m/([a-f0-9]{32}):(\w+)\</g;
    for( my $i=0;$i<$#a;$i+=2 )
    {
        print "$a[$i]\:$a[$i+1]\n";
    }
}

Пример с 1-й по 3-ю страницу

Код:

C:\pl\test>h.pl > hash.txt

C:\pl\test>type hash.txt
7070684d0d96475bb1b8f14a76dfbe21:bungon
e153ad7d20bb170d22a15589c72d984d:adinlc
8ac5925741f72d5d4acca9b740218198:mfj1278

C:\pl\test>

пс нету столько трафика чтобы выложить готовый список : (