Sweet!! Thanks a million!!!

Any ideas how to get the text/plain section of the message into an array or scalar?

> -----Original Message-----
> From: Casey West [mailto:[EMAIL PROTECTED]] 
> Sent: Friday, February 21, 2003 11:13 AM
> To: Dan Muey
> Cc: [EMAIL PROTECTED]
> Subject: Re: parsing email from STDIN
> 
> 
> It was Friday, February 21, 2003 when Dan Muey took the soap 
> box, saying:
> : Hello list,
> : 
> : What is the best way to get the headers of an email into a 
> hash and also the text part of the body into an array or variable?
> 
> Mail::Internet->new() accepts a list reference full of lines 
> in an email message.  This is nice, since getting a list from 
> STDIN is not difficult.
> 
>   my $mail = Mail::Internet->new( [ <STDIN> ] );
>   my $headers = $mail->head->header_hashref;
>   my $subject = $headers->{Subject};
> 
> Enjoy!
> 
>   Casey West
> 
> -- 
> Shooting yourself in the foot with Apple System 7 
> Double click the gun icon and a window giving a selection for 
> guns, target areas, plus balloon help with medical remedies, 
> and assorted sound effects. Click "shoot" button and a small 
> bomb appears with note "Error of Type 1 has occurred." 
> 
> 

--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]

Reply via email to