On Mon, 24 Apr 2006, Steve Basford wrote:
> The file you need is: http://www.sanesecurity.com/clamav/phish.ndb.gz
I've atached my updated Perl script. It will now check the compressed
archive, and if it is updated download and upcompress it.
==========================================================
Chris Candreva -- [EMAIL PROTECTED] -- (914) 967-7816
WestNet Internet Services of Westchester
http://www.westnet.com/
#!/usr/local/bin/perl
use LWP::Simple qw(mirror $ua);
$| = 1;
$ua->timeout(60);
my $url = 'http://www.sanesecurity.com/clamav/phish.ndb.gz';
my $file = 'phish.ndb.gz';
my $dbfile = 'phish.ndb';
my $result = mirror($url, $file);
print "$file\t$result\n";
if ($result == 200) {
system "gunzip -v --stdout $file > $dbfile";
}
exit 0;
_______________________________________________
http://lurker.clamav.net/list/clamav-users.html
