Win32::IEAutomation::RapidShare - Perl extension for downloading files hosted by RapidShare
use Win32::IEAutomation::RapidShare; my $ie = Win32::IEAutomation::RapidShare->new( taskName => 'box180FPS', debug => 1, links => \@rsURL, loopServer => 'yes', stopIfBroken => 'yes' startTime => '17:02', stopTime => '09:00' ); my $url = 'http://rapidshare.com/users/ISWUF5'; $num = $ie->add_rslinks( url => $url ); $num = $ie->add_rslinks( array => \@uuu ); $num = $ie->add_rslinks( file => "rsList.txt"); $num = $ie->check_rslinks(); $ie->downloadrs();
This module uses RapidShare free user account to batch download files. No interactive user action is involved. If waiting between downloads is annoy, please upgrade to premium users. Time works for you.
This is the constructor for new Internet Explorer instance through Win32::OLE. Calling this function will create a perl object which internally contains a automation object for internet explorer. In addition to Win32::IEAutomation's options, RapidShare specific options are supported.
taskName is optional. The URLs list will be saved to a text file. The default name is rapidshare.
It sets the visibility of Internet Explorer window. The default value is 0, means by default it will be invisible if you don't set to 1.
It prints more information in DOS prompt if it is defined. By default the debug mode is off.
Specify your favorite download utility. The default tool is lwp-download that comes with LWP. You also can specify utility's option.
Pass download URLs as an array reference to constructor.
There are bunch of alternative download URLs that are point to different server. If this option is defined, different server's URL will be used for each file download. By exam the onscreen download information - download speed and time, users might figure out which server is fast, and then users could use that particular server later.
Specify the download server that users like to use for downloading.
RapidShare hosted file has max file size limitation (200M?). Lots of big files are zipped and splitted before uploading to RapidShare. So please always validate all links firstly. If any link is broken, it might not a good idea to continue to download files. You could end up with files that cannot be merged and uncompressed.
Specify time to start downloading files. So users can avoid internet rush hour.
Specify time to stop downloading files.
Import download links from different resource. Duplicated links will be removed from download list. This method returns the number of links.
Get from a array reference: $ie->add_rslinks( array => \@uuu )
Get from a URL list file: $ie->add_rslinks( file => "rsList.txt")
Get from a URL whose page has links: $ie->add_rslinks( url => 'http://rapidshare.com/users/ISWUF5' )
Validate all links by using RapidShare file checking tool. This method returns the number of broken links. if stopIfBroken is defined and some links broken, the script will exit.
Download all links you jus imported.
use Win32::IEAutomation::RapidShare; my $ie = Win32::IEAutomation::RapidShare->new( links =>[$ARGV], ); $ie->check_rslinks(); $ie->downloadrs();
Jing Kang <email@example.com>