NAME

Win32::IEAutomation::RapidShare - Perl extension for downloading files hosted by RapidShare

SYNOPSIS

  use Win32::IEAutomation::RapidShare;

  my $ie = Win32::IEAutomation::RapidShare->new(
	visible      => 0,
	debug        => 1,
	links        => \@rsURL,
	loopServer   => 'yes',
	stopIfBroken => 'yes'
  );

  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();

DESCRIPTION

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.

METHODS

Win32::IEAutomation::RapidShare->new( )

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.

  • visible

    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.

  • debug

    It prints more information in DOS prompt if it is defined. By default the debug mode is off.

  • dltool

    Specify your favorite download utility. The default tool is lwp-download that comes with LWP. You also can specify utility's option.

  • links

    Pass download URLs as an array reference to constructor.

  • loopServer

    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.

  • preferServer

    Specify the download server that users like to use for downloading.

  • stopIfBroken

    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.

$ie->add_rslinks( )

Import download links from different resource. Duplicated links will be removed from download list. This method returns the number of links.

  • array

    Get from a array reference: $ie->add_rslinks( array => \@uuu )

  • file

    Get from a URL list file: $ie->add_rslinks( file => "rsList.txt")

  • url

    Get from a URL whose page has links: $ie->add_rslinks( url => 'http://rapidshare.com/users/ISWUF5' )

$ie->check_rslinks( )

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.

$ie->downloadrs( )

Download all links you jus imported.

Sample Script rs.pl to download a single file

use Win32::IEAutomation::RapidShare;

my $ie = Win32::IEAutomation::RapidShare->new(
	links =>[$ARGV[0]],
);

$ie->check_rslinks();
$ie->downloadrs();

SEE ALSO

Win32::IEAutomation.

AUTHOR

Jing Kang <kxj@hotmail.com>