[prev in list] [next in list] [prev in thread] [next in thread] 

List:       perl-mailbox
Subject:    Re: extract From: line from a part
From:       Mark Overmeer <Mark () Overmeer ! net>
Date:       2003-03-14 13:42:19
[Download RAW message or body]

* Mike Cudmore (Mike.Cudmore@dft.gsi.gov.uk) [030313 16:13]:
> I have an email that has been produced as a result of being forwarded
> from mailbox to mail box. 
> 
> Thanks to MarkoV's help/directionsI have been able to select a part of
> an email that is of further interest to me.
> 
> In that part I want to select the From: details to give me who is
> reputed to have sent the part.
> 
> I can that I could read the part in to an array using $obj->lines, then
> parse the array for From:

Why not simply use:

  my $from = $message->from;

(also works for parts and nested messages)
-- 
               MarkOv       %-]

------------------------------------------------------------------------
drs Mark A.C.J. Overmeer                                MARKOV Solutions
       Mark@Overmeer.net                          solutions@overmeer.net
http://Mark.Overmeer.net                   http://solutions.overmeer.net

[prev in list] [next in list] [prev in thread] [next in thread]