[Mimedefang] recursively removing headers from forwarded attachments

[Jonas Eckerman]

d at vidm.cc wrote:

> I'm using MIMEDefang to remove headers from outgoing mail
> which would otherwise reveal details of my organization's
> internal network, virus scanner, etc.

This seems like a misplaced trust in "security by obscurity" that 
will make it harder tracking down eventual mail problems 
(including delivery problems and powned or infected local hosts).

A bad idea IMO.

 > I want to perform this
> task recursively, i.e., remove headers from messages which
> are being forwarded as attachments, etc. Has anybody successfully
> done this with MIMEDefang? Any help would be greatly appreciated!

MIMEDefang allready does most of the work for you since it parses 
the mail, recurses through it and calls the "filter" or 
"filter_mutlipart" function for each entity.

Take a look at:
man mimedefang-filter
perldoc MIME::Head
perldoc MIME::Entity

And remember "action_rebuild()".

Regards
/Jonas
-- 
Jonas Eckerman, FSDB & Fruktträdet
http://whatever.frukt.org/
http://www.fsdb.org/
http://www.frukt.org/