jef moskot wrote:

> I didn't mean to spark a milter fight, but as the Subject line says, we're
> looking for the simplest thing out there.  I'm replacing a simplistic perl
> script that just broke a message down, clamscanned it, and either passed
> it on for delivery or quarantined and notified.  That's it.

Here is a complete MIMEDefang filter to do just that:

#=============================
$Features{'Virus:CLAMD'} = '/full/path/to/clamd';
$ClamdSock = '/full/path/to/clamd.sock';
$Features{'Virus:CLAMAV'} = '/full/path/to/clamscan'
$AdminAddress = '[EMAIL PROTECTED]';

sub filter_end
{
    my ($code, $category, $action) = message_contains_virus();
    if ($action eq 'quarantine') {
        send_quarantine_notifications();
        action_discard();
    }
}
#=============================

It'll quarantine the virus and sent a notification to $AdminAddress.

Regards,

David.
_______________________________________________
Help us build a comprehensive ClamAV guide: visit http://wiki.clamav.net
http://www.clamav.net/support/ml

Reply via email to