Perl + Antigate.com

прочел, вроде все ясно http://kaimi.ru/2009/05/anticaptcha-perl/

Однако выдает "No such captcha id", что значит моей каптчи под таким ид там нет. Как такое может выйти??!
Кто-нибудь работал с антигейтом на перле?

 

либо сервис перегружен , либо ты не правильно шлешь

 

Сервис гуд. Видимо модуль каими уже помер, нужно переписать. Открыл АПИ и написал все сам - вышло. ВОт код:

Code:

use LWP::UserAgent;
use HTTP::Request::Common;
my $ua = LWP::UserAgent->new;
$res=$ua->request(POST 'http://antigate.com/in.php',
       Content_Type => 'form-data',
       Content      => [ method => 'post',
                         key => 'кодкапчи',
						 file => ["pic.jpg"],
                       ]
);

$res->decoded_content=~/OK\|(.*)/;
$id=$1;
print "id:$id\n";
$res=$ua->get("http://antigate.com/res.php?key=кодкапчи&action=get&id=$id");
while($res->decoded_content=~/CAPCHA_NOT_READY/)
{
	print ".";
	sleep(3);
	$res=$ua->get("http://antigate.com/res.php?key=кодкапчи&action=get&id=$id");
}
$res->decoded_content=~/OK\|(.*)/;
$c=$1;
print $c;