SVN: toys/rsget.pl/Get/FreakShare
sparky
sparky at pld-linux.org
Sun Feb 28 12:27:30 CET 2010
Author: sparky
Date: Sun Feb 28 12:27:29 2010
New Revision: 11217
Modified:
toys/rsget.pl/Get/FreakShare
Log:
- add file size information, captcha not suported yet
Modified: toys/rsget.pl/Get/FreakShare
==============================================================================
--- toys/rsget.pl/Get/FreakShare (original)
+++ toys/rsget.pl/Get/FreakShare Sun Feb 28 12:27:29 2010
@@ -20,8 +20,8 @@
RESTART( - irand( 60, 300 ), "free limit reached" )
if /Sorry, your Traffic is used up for today/;
- ! m#<h1 class="box_heading" style="text-align:center;">(.*)</h1>#;
- INFO( name => $1, size => -1 );
+ ! m#<h1 class="box_heading" style="text-align:center;">(.*?) - (\d+ MB)yte</h1>#;
+ INFO( name => $1, asize => $2 );
! $-{form} = $self->form( match => { body => qr/"Free Download"/ } );
More information about the pld-cvs-commit
mailing list