#!/usr/bin/perl -T #$Id: CurrentTorrents.pl,v 1.1 2005/03/23 00:15:55 andrew Exp $ use strict; use warnings; use diagnostics; use BT::MetaInfo; use lib 'lib'; use OpenBSDTorrents; %ENV = (); use YAML;