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