[Mimedefang] survey: dropping password protected file

[Todd Aiken]

> >         my $zip = Archive::Zip->new();
> > >         if ($zip->read($path) == AZ_OK) {
> > 
> > Having trouble with the last line above.  My system seems to 
> > catch these password protected files, but I'm getting the following in my 
> > syslog when it does so:
> > 
> > mimedefang-multiplexor: Slave 0 stderr: Argument AZ_OK isn't 
> > numeric in numeric eq (==) at /etc/mail/mimedefang-filter line 291
> 
> Ensure your filter has:
> 
> use Archive::Zip qw( :ERROR_CODES );
> 
> See
> http://www.mail-archive.com/mimedefang@lists.roaringpenguin.com/msg00356.html
> for details.

That did the trick!  Many thanks Paul.


CU L8R...

Todd A. Aiken 
Systems Analyst - Administrator
Cole Computer Centre
BISHOP'S UNIVERSITY
Lennoxville, Quebec, CANADA

"GUIs on servers... That's like putting an air conditioner on a 
motorcycle..."

-----BEGIN GEEK CODE BLOCK-----
Version 3.12 (http://www.geekcode.com)
GCS$/MU d+(-) s++:+ a C++$ UL++++$ P+ L++ E->+ W+>++ N++ o? K-
w O- M V? PS PE- Y PGP- t+ 5 X R- tv+ b DI(+) D++ G e+ h !r>r+++ y-
------END GEEK CODE BLOCK------