Wednesday, December 24, 2008

WWW::Rapidshare::Free

Just released WWW::Rapidshare::Free Perl module for all free users of Rapidshare. Check out the example directory for a sample script. You can expect a GUI soon!

6 comments:

Blank said...

thanks. How do I program it to wait about an hour between downloads, so that it does not reject my download attempts?

Alan Haggai Alavi said...

Hi,

Right now, there is no such feature in the module. It seems to be a good feature which I will be adding in the next version.

However, you can always make use of a hard delay for an hour by using a sleep(3600) in between the downloads.

Hope it helps.

Blank said...

Thanks, I'll be waiting for the next version.

Do you mean, like this:

sub file_complete { # Connection called inside the callback
print "\nFile downloaded successfully!\n"; # Most probably!
sleep 1200
}

Blank said...

It seems that rapidshare changed it behaviour somehow in the past couple of days, now I get:

Simultaneous downloads are not available for free users at ./perlGetRapid line 20

Line 20, is the first in this block:

my @erroneous_links = check_links;
map {
my ( $uri, $error ) = @{$_};
print "URI: $uri\nError: $error\n";
} @erroneous_links;

Alan Haggai Alavi said...

Hi,

I have got two bug reports as well. So, I hope it will be fixed in the next version of the module. I have not been able to work on it for a while due to other concerns.

As for your previous comment, I am sorry to say that I forgot to reply. I think the code that you posted will work flawlessly.

Were any of your downloads corrupted (loss of few bits) while downloading with the module? If so, please let me know.

Thank you for reporting.

Blank said...

Were any of your downloads corrupted (loss of few bits) while downloading with the module?

No.