The very best way is: Mail::Message->new( $your_message_from_664_093 ); (update: not even close)
It does everything you want and much more.
my $body = $msg->body; my @encoded = $msg->body->lines; my @to = $msg->to; my @from = $msg->from;
-Paul
In reply to Re: Parsing email
by jettero
in thread Parsing email
by jeteve
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |