SVN: toys/rsget.pl/Get/SendSpace
sparky
sparky at pld-linux.org
Sat Jun 5 02:05:11 CEST 2010
Author: sparky
Date: Sat Jun 5 02:05:12 2010
New Revision: 11533
Modified:
toys/rsget.pl/Get/SendSpace
Log:
- updated / fixed
Modified: toys/rsget.pl/Get/SendSpace
==============================================================================
--- toys/rsget.pl/Get/SendSpace (original)
+++ toys/rsget.pl/Get/SendSpace Sat Jun 5 02:05:12 2010
@@ -11,7 +11,7 @@
tos: "http://sendspace.com/terms.html"
uri: qr{sendspace\.com/file/}
cookie: ss
-status: BROKEN 2010-06-04
+status: OK 2010-06-05
start:
GET( $-{_uri} );
@@ -19,7 +19,7 @@
ERROR( "file not found" )
if /Sorry, the file you requested is not available/;
- ! m#<b>Name:</b>\s*(.*?)\s*<br><b>Size:</b>\s*(\d+MB)\s*<br>#;
+ ! m#<b>Name:</b>\s*(.*?)\s*<br><b>Size:</b>\s*([\d\.]+MB)\s*<br>#;
INFO( name => $1, asize => $2 );
! my $form = $self->form( match => { body => qr/"download"/ } );
More information about the pld-cvs-commit
mailing list