
Email::StripMIME - Turn 'enhanced' emails back to plain text

Provides a sensible text representation of an email's content

use Email::StripMIME; my $email = join '', (<>); print Email::StripMIME::strip_mime( $email );

Returns the email you passed it, with all plain text attachments folded into the message body, and non-text attachments removed. Fiddles the MIME headers to reflects this.
If no plain text attachments were found, but there were HTML ones, it'll convert them to plain text and use those for the message body.

Pete Sergeant -- pete@clueball.com

Copyright 2005 Pete Sergeant.
This program is free software; you can redistribute it and/or modify it under the same terms as Perl itself.