email attachment cleaner

If my virus scanner detects any virus, I use this to clean my emails from any attachments. Plus any html content is converted to simple text. NOTE: This is not considered to be THE solution to view virus email. The best is to delete them without viewing (well except maybe view with "pine").

Update:

26 Feb 2007: attached emails are now cleaned as well. All content inside the attached emails are cleaned from binaries and html content is converted into text

Depends on the perl modules:

Email-MIME
Email-MIME-Creator
Email-MIME-Modifier
Email-Send
Email-MIME-Encodings
Email-MIME-ContentType
Email-Simple
MIME-Types
Email-Address
Email-Simple-Creator
Email-Date
Email-Abstract
Email-MessageID

download:
clean_virus_email.pl
License

This software is GPL licensed.

Usage:
The raw email is fed into the script. Like: "MTA | clean_virus_email.pl"
The email is then cleaned from all attached content (programms, VBA scripts, PDF and pictures). The HTML text is converted into "text/plain", which I consider secure because there are no links to follow.
The resulting email then get an explanation about the cleaned content, and the content is replaced as a sub-container in the email. Then the email is given to the local MTA which submits it to the original recipient.

Examples:

procmail ($HOME/.procmailrc):

:0
* ^X-Amavis-Alert: INFECTED
* !^X-Virus_Cleaner: clean
{
	# mail is cleaned and re-fed into the mail system
	:0 wc
	| clean_virus_email.pl

	# save a copy to examine carefully
	:0 
	$MAILFOLDER/Virus_infected__use_with_CAUTION
}

Amavis (amavisd.conf):

$virus_quarantine_method = 'pipe:argv=/usr/local/bin/clean_virus_email.pl';