SVN: toys/rsget.pl/Get/MegaUpload

[sparky]

Author: sparky
Date: Tue Oct  6 21:32:08 2009
New Revision: 10706

Modified:
   toys/rsget.pl/Get/MegaUpload
Log:
- added megavideo.com/?d= to uris


Modified: toys/rsget.pl/Get/MegaUpload
==============================================================================
--- toys/rsget.pl/Get/MegaUpload	(original)
+++ toys/rsget.pl/Get/MegaUpload	Tue Oct  6 21:32:08 2009
@@ -6,6 +6,7 @@
 uri: qw{megaporn\.com/(../)?\?d=}
 uri: qw{megarotic\.com/(../)?\?d=}
 uri: qw{sexuploader\.com/(../)?\?d=}
+uri: qw{megavideo\.com/\?d=}
 status: OK 2009-08-24
 
 pre:
@@ -16,6 +17,8 @@
 
 start:
 	( my $uri = $-{_uri} ) =~ s#^(http://(?:www\.)?)(?:megarotic|sexuploader)#$1megaporn#;
+	$uri =~ s#^(http://(?:www\.)?)megavideo#megaupload#;
+
 	GET( $uri );
 stage_first:
 	$-{first_page} = $-{_referer};