NAME WebService::AntiCaptcha - anti-captcha.com API SYNOPSIS use WebService::AntiCaptcha; my $wac = WebService::AntiCaptcha->new( clientKey => 'your_client_key' ); my $res = $wac->getBalance or die $wac->errstr; print $res->{balance}; DESCRIPTION WebService::AntiCaptcha is for https://anticaptcha.atlassian.net/wiki/spaces/API/pages/196635/Documentation+in+English NOTE Note we don't raise error for API response errorId > 0. You should handle those yourself. # after each method call die $wac_res->{errorDescription} if $wac_res->{errorId}; METHODS createTask https://anticaptcha.atlassian.net/wiki/spaces/API/pages/5079073/createTask+captcha+task+creating my $res = $wac->createTask($task, $softId, $languagePool); ImageToTextTask my $res = $wac->createTask({ type => 'ImageToTextTask', body => "BASE64_BODY_HERE!", }) or die $wac->errstr; NoCaptchaTaskProxyless recaptcha solving. check xt/recaptcha.pl for a working example. my $res = $wac->createTask({ type => 'NoCaptchaTaskProxyless', websiteURL => "http://mywebsite.com/recaptcha/test.php", websiteKey => "6Lc_aCMTAAAAABx7u2N0D1XnVbI_v6ZdbM6rYf16" }) or die $wac->errstr; NoCaptchaTask with proxy my $res = $wac->createTask({ type => 'NoCaptchaTask', websiteURL => "http://mywebsite.com/recaptcha/test.php", websiteKey => "6Lc_aCMTAAAAABx7u2N0D1XnVbI_v6ZdbM6rYf16", "proxyType" => "http", "proxyAddress" => "8.8.8.8", "proxyPort" => 8080, "proxyLogin" => "proxyLoginHere", "proxyPassword" => "proxyPasswordHere", "userAgent" => "Mozilla/5.0 (Macintosh; Intel Mac OS X 10_11_6) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/52.0.2743.116 Safari/537.36" }) or die $wac->errstr; getTaskResult https://anticaptcha.atlassian.net/wiki/spaces/API/pages/5079103/getTaskResult+request+task+result my $res = $wac->getTaskResult($taskId) or die $wac->errstr; getBalance https://anticaptcha.atlassian.net/wiki/spaces/API/pages/6389791/getBalance+retrieve+account+balance my $res = $wac->getBalance or die $wac->errstr; print $res->{balance}; getQueueStats https://anticaptcha.atlassian.net/wiki/spaces/API/pages/8290316/getQueueStats+obtain+queue+load+statistics my $res = $wac->queueId($queueId) or die $wac->errstr; reportIncorrectImageCaptcha my $res = $wac->reportIncorrectImageCaptcha($taskId) or die $wac->errstr; AUTHOR Fayland Lam COPYRIGHT Copyright 2017- Fayland Lam LICENSE This library is free software; you can redistribute it and/or modify it under the same terms as Perl itself. SEE ALSO