SVN: toys/rsget.pl/Get/FreakShare
sparky
sparky at pld-linux.org
Tue May 4 15:58:05 CEST 2010
Author: sparky
Date: Tue May 4 15:58:05 2010
New Revision: 11368
Modified:
toys/rsget.pl/Get/FreakShare
Log:
- updated recaptcha, based on hotfile problems
Modified: toys/rsget.pl/Get/FreakShare
==============================================================================
--- toys/rsget.pl/Get/FreakShare (original)
+++ toys/rsget.pl/Get/FreakShare Tue May 4 15:58:05 2010
@@ -41,10 +41,13 @@
GET( $1, keep_referer => 1 );
- ! m{challenge : '(\S+)',};
+ ! m{server\s*:\s*'(\S+?)'};
+ my $server = $1;
+
+ ! m{challenge\s*:\s*'(\S+?)',};
$-{capform}->set( recaptcha_challenge_field => $1 );
- GET( "http://api.recaptcha.net/image?c=" . $1, keep_referer => 1 );
+ GET( $server . "image?c=" . $1, keep_referer => 1 );
CAPTCHA(
qr/\S+ \S+/
More information about the pld-cvs-commit
mailing list