[Mimedefang] Anyone using File::Scan?
Jan Pieter Cornet
johnpc at xs4all.nl
Mon Feb 21 17:45:59 EST 2005
On Tue, Feb 15, 2005 at 09:46:57PM -0500, David F. Skoll wrote:
> Does anyone use File::Scan with MIMEDefang? It seems to cause a lot
> of problems with false positives.
There recently was a short discussion about File::Scan on the
clamav-users mailinglist, it's available at:
http://lurker.clamav.net/message/20050217.162703.87a85372.en.html
--
#!perl -wpl # mmfppfmpmmpp mmpffm <pmmppfmfpppppfmmmf at fpffmm4mmmpmfpmf.ppppmf>
$p=3-2*/[^\W\dmpf_]/i;s.[a-z]{$p}.vec($f=join('',$p-1?chr(sub{$_[0]*9+$_[1]*3+
$_[2]}->(map{/p|f/i+/f/i}split//,$&)+97):qw(m p f)[map{((ord$&)%32-1)/$_%3}(9,
3,1)]),5,1)='`'lt$&;$f.eig; # Jan-Pieter Cornet
More information about the MIMEDefang
mailing list