Name Net::BitTorrent - BitTorrent peer-to-peer protocol class Synopsis use Net::BitTorrent; sub hash_pass { my ($self, $piece) = @_; printf(qq[hash_pass: piece number %04d of %s\n], $piece->get_index, $piece->get_session); } my $client = Net::BitTorrent->new(); $client->set_callback(q[piece_hash_pass], \&hash_pass); # ... # set various callbacks if you so desire # ... my $torrent = $client->add_session({path => q[a.legal.torrent]}) or die q[Cannot load .torrent]; while (1) { $client->do_one_loop(); # Etc. } Description "Net::BitTorrent" is a class based implementation of the current BitTorrent Protocol Specification. Each "Net::BitTorrent" object is capable of handling several concurrent .torrent sessions. Installation This distribution uses "Module::Build" for installation, so use the following procedure: perl Build.PL ./Build ./Build test ./Build install Bugs Please see the Todo file included with this distribution, perldoc Net::BitTorrent, and perldoc Net::BitTorrent::TODO, and http://sankorobinson.com/net-bittorrent/ for more information. Author Sanko Robinson - http://sankorobinson.com/ CPAN ID: SANKO License and Legal Copyright 2008 by Sanko Robinson This program is free software; you can redistribute it and/or modify it under the same terms as Perl 5.10 (or higher). See http://www.perl.com/perl/misc/Artistic.html or the LICENSE file included with this distribution. All POD documentation is covered by the Creative Commons Attribution- Noncommercial-Share Alike 3.0 License (http://creativecommons.org/licenses/by-nc-sa/3.0/us/). Neither this module nor the Author is affiliated with BitTorrent, Inc. $Id: README 24 2008-07-01 23:52:15Z sanko@cpan.org $