| Subject: | clamscan recognises virus, but Mail::ClamAV doesn't. |
virus: http://jessen.ch/files/1135265287.V902I5e924.thorium
This code reports that file as clean:
my $status = $clam->scan("/tmp/1135265287.V902I5e924.thorium",
CL_ARCHIVE|CL_MAIL);
# $status is an overloaded object
die "Failed to scan: $status" unless $status;
if ($status->virus) {
print "identified virus \"$status\".\n";
}
else
{
print "no virus identified: $status\n";
}