=================================================================== RCS file: /cvs/openbsd/OpenBSDTorrents/ServerTorrents.pl,v retrieving revision 1.3 retrieving revision 1.4 diff -u -r1.3 -r1.4 --- openbsd/OpenBSDTorrents/ServerTorrents.pl 2005/03/24 19:49:51 1.3 +++ openbsd/OpenBSDTorrents/ServerTorrents.pl 2005/03/24 20:59:07 1.4 @@ -1,5 +1,5 @@ #!/usr/bin/perl -T -#$Id: ServerTorrents.pl,v 1.3 2005/03/24 19:49:51 andrew Exp $ +#$Id: ServerTorrents.pl,v 1.4 2005/03/24 20:59:07 andrew Exp $ use strict; use warnings; use diagnostics; @@ -19,6 +19,7 @@ my $url_torrents = 'http://openbsd.somedomain.net/dumptorrents.php'; my $url_upload = 'http://openbsd.somedomain.net/newtorrents.php'; my $url_delete = 'http://openbsd.somedomain.net/deltorrents.php'; +my $url_sanity = 'http://openbsd.somedomain.net/sanity.php'; my $user = 'torrentup'; my $pass = 'ssapword'; @@ -108,6 +109,7 @@ } } +$ua->get($url_sanity); sub Upload_Torrent {