version 1.21, 2006/05/15 19:47:04 |
version 1.22, 2006/07/24 19:03:53 |
|
|
#!/usr/bin/perl -T |
#!/usr/bin/perl -T |
#$RedRiver: ServerTorrents.pl,v 1.20 2005/06/03 01:32:40 andrew Exp $ |
#$RedRiver: ServerTorrents.pl,v 1.21 2006/05/15 18:47:04 andrew Exp $ |
use strict; |
use strict; |
use warnings; |
use warnings; |
use diagnostics; |
use diagnostics; |
|
|
$t = BT::MetaInfo::Cached->new( |
$t = BT::MetaInfo::Cached->new( |
$OBT->{DIR_TORRENT} . '/' . $_, |
$OBT->{DIR_TORRENT} . '/' . $_, |
{ |
{ |
cache_root => |
cache_root => '/tmp/OBTFileCache' |
$OBT->{DIR_HOME} . '/FileCache' |
#$OBT->{DIR_HOME} . '/FileCache' |
} |
} |
); |
); |
}; |
}; |