SVN: toys/rsget.pl/Get/SendSpace

sparky sparky at pld-linux.org
Sat Sep 12 15:25:48 CEST 2009


Author: sparky
Date: Sat Sep 12 15:25:47 2009
New Revision: 10587

Added:
   toys/rsget.pl/Get/SendSpace
Log:
- new


Added: toys/rsget.pl/Get/SendSpace
==============================================================================
--- (empty file)
+++ toys/rsget.pl/Get/SendSpace	Sat Sep 12 15:25:47 2009
@@ -0,0 +1,25 @@
+#!/usr/bin/perl
+
+name: SendSpace
+short: SS
+uri: qr{sendspace\.com/}
+cookie: ss
+status: OK 2009-09-12
+
+start:
+	GET( $-{_uri} );
+
+	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>#;
+	INFO( name => $1, asize => $2 );
+
+	! m#<a id="downlink" class="mango" href="(.*?)"#;
+	my $file_uri = $1;
+
+	DOWNLOAD( $file_uri );
+
+	MULTI() if /You cannot download more than one file at a time/;
+
+# vim:ts=4:sw=4


More information about the pld-cvs-commit mailing list