openbsd/OpenBSDTorrents/ServerTorrents.pl - diff

Return to ServerTorrents.pl CVS log

Up to [local] / openbsd / OpenBSDTorrents

version 1.13, 2005/05/05 18:48:19

version 1.14, 2005/05/05 21:33:42

Line 9

use lib 'lib';

use OpenBSDTorrents;

use BT::OBTMetaInfo;

use BT::MetaInfo::Cached;

%ENV = ();

Line 117

print "Uploading $file\n";

my $t;

eval { $t = BT::OBTMetaInfo->new("$OBT->{DIR_TORRENT}/$file"); };

eval { $t = BT::MetaInfo::Cached->new("$OBT->{DIR_TORRENT}/$file"); };

if ($@) {

warn "Error reading torrent $file\n";

return undef;