SVN: toys/rsget.pl/Get/MegaUpload

sparky sparky at pld-linux.org
Sat Jun 26 01:45:05 CEST 2010


Author: sparky
Date: Sat Jun 26 01:45:05 2010
New Revision: 11579

Modified:
   toys/rsget.pl/Get/MegaUpload
Log:
- DELAY() if file is temporarily unavailable


Modified: toys/rsget.pl/Get/MegaUpload
==============================================================================
--- toys/rsget.pl/Get/MegaUpload	(original)
+++ toys/rsget.pl/Get/MegaUpload	Sat Jun 26 01:45:05 2010
@@ -48,11 +48,10 @@
 	RESTART( 10 * 60, "temporarily blocked" )
 		if m{document\.location='http://www\.megaupload\.com/\?c=msg'};
 
-	# TODO: if file is unavailable temporarily try to download it
-	# later (lower uri priority)
-	ERROR( "file not found" ) if
-		/The file you are trying to access is temporarily unavailable/
-			or /Unfortunately, the link you have clicked is not available/
+	DELAY( 600, "temporarily unavailable" )
+		if /The file you are trying to access is temporarily unavailable/;
+	ERROR( "file not found" )
+		if /Unfortunately, the link you have clicked is not available/
 			or /This file has expired due to inactivity/;
 	m{<TD valign="middle" align="left" .*?width="500">(.*?)</TD>}s;
 	my @f = map m#<font.*?>\s*(.*?)\s*</font>#g, $1;


More information about the pld-cvs-commit mailing list