Beefy Boxes and Bandwidth Generously Provided by pair Networks
more useful options
 
PerlMonks  

Re: Carving up MIME email on STDIN

by thatguy (Parson)
on Dec 03, 2003 at 19:25 UTC ( #311982=note: print w/replies, xml ) Need Help??


in reply to Carving up MIME email on STDIN

I was digging around the Super Search and found this node which would suggest that the following would work:

## snip foreach my $i ( 0 .. $#parts ) { ## print the mime type print "Part $i ". $parts[$i]->mime_type . "\n\n"; ## print the name print "Name $i ". $parts[$i]->head->mime_attr('content-disposition.f +ilename'); } ## snip

keep in mind that this code is UNTESTED.

-phill

Log In?
Username:
Password:

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://311982]
help
Chatterbox?
[Corion]: Whoa! Somebody forwarded the AnyEvent::Impl:: Prima loop to schmorp and he's even interested in maintaining it himself - that'd be highly convenient for me ;)
[Corion]: (I also have a mail by dk who suggests some additions, which I should add this evening)
[ambrus]: Corion: um, that was me (duh)

How do I use this? | Other CB clients
Other Users?
Others musing on the Monastery: (8)
As of 2016-12-09 14:05 GMT
Sections?
Information?
Find Nodes?
Leftovers?
    Voting Booth?
    On a regular basis, I'm most likely to spy upon:













    Results (151 votes). Check out past polls.