WWW::Search::Mininova is a Perl interface to www.mininova.org Torrent site.
SYNOPSIS
use WWW::Search::Mininova;
my $mini = WWW::Search::Mininova->new;
$mini->search('foo')->{results}[0]{download_uri};
use WWW::Search::Mininova;
my $mini = WWW::Search::Mininova->new(
category => 'Music',
sort => 'Seeds',
);
$mini->search('foo');
if ( defined $mini->did_you_mean ) {
print "Did you mean to search for "
. $mini->did_you_mean . "?n";
}
print "Found " . $mini->results_found . " resultsn";
foreach my $result ( @{ $mini->results } ) {
if ( $result->{is_private} ) {
print "Private trackern";
}
print {seeds}
Number of leechers: $result->{leechers}
Torrent page: $result->{uri}
Download URI: $result->{download_uri}
Torrent size: $result->{size}
Category: $result->{category}
Sub category: $result->{subcategory}
Was added on: $result->{added_date}
END_RESULT_DATA
}
Product's homepage
Requirements:
· Perl