NAME

WWW::BitTorrent - Search and Download .torrent(s) files from BitTorrents boards.

SYNOPSIS

# Creates WWW::BitTorrent Object.
my $client = WWW::BitTorrent->new( 'site' => $site, 'user' => $user, 'pass' => $pass);

# Check for errors.
if ($client->{STAT} == 0) {
	print "ERROR: " . $client->{ERROR}."\n";
	exit;
}

# return all rows (from page 1) and prints it
my @page = $client->browse(1);
	die("Error occured calling browse or page is empty\n") if ($#page == -1);

foreach my $row (@page) {
	print "Row: " . $row->{name} . "- id: " . $row->{id} ."\n";
}

# Search for a row
@page = $client->search('DiAMOND');
	die("No Results.\n") if ($#page == -1);

my $download_row;

foreach my $row (@page) {
	print "Row: " . $row->{name} . "- id: " . $row->{id} ."\n";
	$download_row = $row if ($row->{name} =~ /my.favorite.movie/);
}

# download .torrent file
$client->download_torrent($download_row, '/tmp/' . $download_row->{id} . '.torrent');

DESCRIPTION

"WWW::BitTorrent" provides an object interface to using two BitTorrent based boards: "TBSource", "BrokenStone" (tell me about more). This boards are being update every day with files. This module allows you to search for files in a couple of ways.

NOTE: any use of this module that is illegal is out of my responsibilty.

This module requires LWP::UserAgent and LWP::Simple.

INTERFACE

new( [ARGS] )

	Used to login the Board with the username and password
	of the board (all arguments are required) and create a new Object of 
	the WWW::BitTorrent module. 

	Arguments:

	site- The BitTorrents board URL address.
	user- the username for login the board. 
	pass- the password for login the board. 

	NOTES: 	Returns a blessed object anyways.
		object->{STAT}: 0 - for error (object->{ERROR} - http code)
				1 - for success

browse( $page_number ) 

	Returns a list(array) of all rows(ref) from the the '$page_number' page.
	C<page_number>: number between 0 (first page) and max number of pages.

	Arguments:

	page_number- the number of the page you want the rows from.

search( $keyword )

	This method do the same as browse just by the search option at the board.

download_torrent($row, $path)

	Download the .torrent file using the LWP::Simple module.

AUTHOR

This module was written by Amit Sides <amit.sides@gmail.com>

Copyright

Copyright (c) 2006 Amit Sides. All rights reserved.

LICENSE

This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.