WWW::RapidShare is a time saver
February 13th, 2008 by RohanI uploaded WWW::RapidShare version 0.1 to CPAN today. WWW::RapidShare is a Perl module which you can use to download files from rapidshare.com. Currently, only premium accounts are supported. More features coming soon!
Here’s a simple Perl script to download a file. You need to know the entire URL and of course your Rapidshare account ID and password.
use WWW::RapidShare;
my $rapid = WWW::RapidShare->new();
$rapid->url(’http://rapidshare.com/files/file.zip’);
$rapid->account_id(’xxxxxx’);
$rapid->password(’xxxxxx’);# Download the file associated with the above URL.
# It will be saved in current directory.
$rapid->download_file();
This should work on both Windows and Linux distros.
I also updated the Finance::Bank::HDFC module to version 0.13, which fixes some dependencies.
![[Post to Twitter]](http://rohan.almeida.in/wp-content/plugins/tweet-this/icons/tt-twitter.png){kind=icon}
![[Post to Facebook]](http://rohan.almeida.in/wp-content/plugins/tweet-this/icons/tt-facebook.png){kind=icon}
May 15th, 2008 at 10:20 pm
To download multiple files from multiple URLs at once.. make a new txt file with a list of URLs in it rsfiles1.txt
#!/usr/bin/perl
use WWW::RapidShare;
open FILELIST, “rsfiles1.txt”;
while() {
my $rapid = WWW::RapidShare->new();
$rapid->url($_);
$rapid->account_id(’xxx’);
$rapid->password(’xxx’);
$rapid->download_file();
}
close FILELIST;
May 20th, 2008 at 5:54 pm
hi i send an email for you , explained for my proplem with this module
here again :
i used your perl module for rapidshare
but when i run my perl script its say
“Can’t call method “find_input” on an undefined value at /usr/lib/perl5/site_perl/5.8.8/WWW/Mechanize.pm line 1614.”
The 1614 line of Mechanize.pm is
line 1614 “while ( my $input = $form->find_input(undef, ’submit’, $i) ) {
if ( $args{value} && ($args{value} eq $input->value) ) {
$request = $input->click( $form, $args{x}, $args{y} );
last;
}”
======
what is the wrong?
thanx for the module & ur help
June 11th, 2008 at 1:21 pm
rapidshare.com has changed its web interface. I need to update the module!
November 1st, 2008 at 5:53 am
hi and thanks for use full module
when i run code i get this code , how can i use without error
Can’t call method “action” on an undefined value at D:/Perl/site/lib/WWW/RapidShare.pm line 143.
thank you