1Email::MIME::AttachmentU:s:eSrtrCiopnpterri(b3u)ted PerlEmDaoiclu:m:eMnItMaEt:i:oAnttachment::Stripper(3)
2
3
4
6 Email::MIME::Attachment::Stripper - Strip the attachments from a mail
7
9 version 1.313
10
11 $id$
12
14 my $stripper = Email::MIME::Attachment::Stripper->new($mail);
15
16 my Email::MIME $msg = $stripper->message;
17 my @attachments = $stripper->attachments;
18
20 Given a Email::MIME object, detach all attachments from the message.
21 These are then available separately.
22
24 new
25
26 my $stripper = Email::MIME::Attachment::Stripper->new($mail, %args);
27
28 This should be instantiated with a Email::MIME object. Current argu‐
29 ments supported:
30
31 force_filename
32 Try harder to get a filename, making one up if necessary.
33
34 message
35
36 my Email::MIME $msg = $stripper->message;
37
38 This returns the message with all the attachments detached. This will
39 alter both the body and the header of the message.
40
41 attachments
42
43 my @attachments = $stripper->attachments;
44
45 This returns a list of all the attachments we found in the message, as
46 a hash of { filename, content_type, payload }.
47
49 This module is maintained by the Perl Email Project
50
51 <http://emailproject.perl.org/wiki/Email::MIME::Attachment::Stripper>
52
54 Casey West <casey@geeknest.com>
55
57 This module is incredibly closely derived from Tony Bowden's Mail::Mes‐
58 sage::Attachment::Stripper; this derivation was done by Simon Cozens
59 ("simon@cpan.org"), and you receive this under the same terms as Tony's
60 original module.
61
62
63
64perl v5.8.8 2006-11-2E5mail::MIME::Attachment::Stripper(3)