SVN: toys/rsget.pl/Get/HotFile

sparky sparky at pld-linux.org
Tue May 4 15:48:10 CEST 2010


Author: sparky
Date: Tue May  4 15:48:10 2010
New Revision: 11367

Modified:
   toys/rsget.pl/Get/HotFile
Log:
- fixed recaptcha (belongs to google now)


Modified: toys/rsget.pl/Get/HotFile
==============================================================================
--- toys/rsget.pl/Get/HotFile	(original)
+++ toys/rsget.pl/Get/HotFile	Tue May  4 15:48:10 2010
@@ -11,7 +11,7 @@
 tos: "http://hotfile.com/terms-of-service.html"
 uri: qr{hotfile\.com/dl/\d+/[0-9a-f]+/.+}
 uri: qr{pl\.hotfile\.com/dl/\d+/[0-9a-f]+/.+}
-status: OK 2010-04-08
+status: OK 2010-05-04
 
 unify:
 	return "http://hotfile.com/dl/$1"
@@ -49,10 +49,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