Apache2::ModBT - mod_perl interface to mod_bt
use Apache2::ModBT;
sub handler
{
my $r = shift;
my $tracker = $r->server->ModBT_Tracker();
print $tracker->num_peers, "\n";
foreach my $i ($tracker->Infohashes())
{
...
}
}
This is a pole for perl.
The Apache2::ModBT module adds a method onto the Apache::Server object which returns the LibBTT Tracker object for the current mod_bt process. When manipulating a mod_bt tracker from within Apache2, you should use this method instead of calling Net::BitTorrent::LibBTT->new().
Returns a tracker object that corresponds to the mod_bt tracker instance running on the current apache process. If the tracker is not enabled ("Tracker On" is not set in httpd.conf), this will return undef.
Net::BitTorrent::LibBTT, http://www.crackerjack.net/mod_bt/, http://perl.apache.org/
Tyler 'Crackerjack' MacDonald, <tyler@yi.org>
Copyright (C) 2006 by Tyler 'Crackerjack' MacDonald
This library is free software; you can redistribute it and/or modify it under the terms of the Apache License 2.x (http://www.apache.org/licenses/LICENSE-2.0).
