Email::MIME::AttachmenUsertContributed PerEmail::MIME::Attachment::Stripper(3)NAMEEmail::MIME::Attachment::Stripper - strip the attachments from an email
VERSION
version 1.316
SYNOPSIS
my $stripper = Email::MIME::Attachment::Stripper->new($mail);
my $msg = $stripper->message;
my @attachments = $stripper->attachments;
DESCRIPTION
Given a Email::MIME object, detach all attachments from the message and
make them available separately.
The message you're left with might still be multipart, but it should
only be multipart/alternative or multipart/related.
Given this message:
+ multipart/mixed
- text/plain
- application/pdf; disposition=attachment
The PDF will be stripped. Whether the returned message is a single
text/plain part or a multipart/mixed message with only the text/plain
part remaining in it is not yet guaranteed one way or the other.
METHODS
new
my $stripper = Email::MIME::Attachment::Stripper->new($email, %args);
The constructor may be passed an Email::MIME object, a reference to a
string, or any other value that Email::Abstract (if available) can cast
to an Email::MIME object.
Valid arguments include:
force_filename - try harder to get a filename, making one up if necessary
message
my $email_mime = $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 }.
This may contain parts that might not normally be considered
attachments, like text/html or multipart/alternative.
PERL EMAIL PROJECT
This module is maintained by the Perl Email Project
<http://emailproject.perl.org/wiki/Email::MIME::Attachment::Stripper>
AUTHOR
Currently maintained by Ricardo SIGNES <rjbs@cpan.org>
Written by 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.
perl v5.14.12009-01-Email::MIME::Attachment::Stripper(3)