[Mimedefang] New .zip virus?

[Dave O'Neill]

Lucas Albers wrote:
> Dave,
> why not test it out on your server and then post it when you know it works.
> That...would....be...great!

The latest version of Rick's code snippet using Archive::Zip (see 
http://lists.roaringpenguin.com/pipermail/mimedefang/2004-January/019491.html) 
seems to work fine, as long as you use:
    use Archive::Zip qw( :ERROR_CODES );
instead of just:
    use Archive::Zip;
in your mimedefang-filter file.  Otherwise you'll probably see something 
like:
    Argument "AZ_OK" isn't numeric in numeric eq (==) at 
/etc/mail/mimedefang-filter line 229.
in your logfile.

I don't know how it affects MIMEDefang's performance, but it should be 
better than calling the 'unzip' binary, as Archive::Zip doesn't need to 
fork/exec, and it only needs to read the zip headers, not uncompress the 
file.

Cheers,
Dave
-- 
Dave O'Neill <dmo at roaringpenguin.com>    Roaring Penguin Software Inc.
+1 (613) 231-6599 ext. 104               http://www.roaringpenguin.com/