NAME

Email::MIME::Attachment::Stripper - Strip the attachments from a mail

VERSION

version 1.313

$id$

SYNOPSIS

my $stripper = Email::MIME::Attachment::Stripper->new($mail);

my Email::MIME $msg = $stripper->message;
my @attachments       = $stripper->attachments;

DESCRIPTION

Given a Email::MIME object, detach all attachments from the message. These are then available separately.

METHODS

new

my $stripper = Email::MIME::Attachment::Stripper->new($mail, %args);

This should be instantiated with a Email::MIME object. Current arguments supported:

force_filename

Try harder to get a filename, making one up if necessary.

message

my Email::MIME $msg = $stripper->message;

This returns the message with all the attachments detached. This will alter both the body and the header of the message.

attachments

my @attachments = $stripper->attachments;

This returns a list of all the attachments we found in the message, as a hash of { filename, content_type, payload }.

PERL EMAIL PROJECT

This module is maintained by the Perl Email Project

http://emailproject.perl.org/wiki/Email::MIME::Attachment::Stripper

AUTHOR

Casey West <casey@geeknest.com>

CREDITS AND LICENSE

This module is incredibly closely derived from Tony Bowden's Mail::Message::Attachment::Stripper; this derivation was done by Simon Cozens (simon@cpan.org), and you receive this under the same terms as Tony's original module.