version 1.20, 2005/06/03 02:32:40 |
version 1.22, 2006/07/24 19:03:53 |
|
|
#!/usr/bin/perl -T |
#!/usr/bin/perl -T |
#$Id$ |
#$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' |
} |
} |
); |
); |
}; |
}; |