RE: Extracting and email address

2005-01-21 Thread brian . barto
nners@perl.org Subject: Re: Extracting and email address On Fri, 21 Jan 2005 10:47:33 +, Andrew Black <[EMAIL PROTECTED]> wrote: > Is there a module to extract the real email address from a header. e.g. Yes there is "Email::Find" Why would you want to extract e

Re: Extracting and email address

2005-01-21 Thread Edward Wijaya
On Fri, 21 Jan 2005 10:47:33 +, Andrew Black <[EMAIL PROTECTED]> wrote: Is there a module to extract the real email address from a header. e.g. Yes there is "Email::Find" Why would you want to extract email addresses? Spamming? -- Edward WIJAYA Singapore -- To unsubscribe, e-mail: [EMAIL PR

Re: Extracting and email address

2005-01-21 Thread Dmitry Nikolayev
Of course, you can make the same with your example: my @addresses = Mail::Address->parse('"blah blach" <[EMAIL PROTECTED]>'); print $addresses[0]; The result should be: [EMAIL PROTECTED] With best wishes, Dmitry Nikolayev "Andrew Black" <[EMAIL PROTECTED]> ???/ ? ???

Re: Extracting and email address

2005-01-21 Thread Dmitry Nikolayev
Mail::Address is the module you're searching for, I hope.. my @addresses = Mail::Address->parse($head->get('To')); $head is a header object, as you understood With best wishes, Dmitry Nikolayev "Andrew Black" <[EMAIL PROTECTED]> ???/ ? ?: news:[EMAIL PROTECTED]

Re: Extracting and email address

2005-01-21 Thread Ing. Branislav Gerzo
Andrew Black [AB], on Friday, January 21, 2005 at 10:47 (+) made these points: AB> Is there a module to extract the real email address from a header. e.g. AB> given AB> "blah blach" <[EMAIL PROTECTED]> AB> extracts the [EMAIL PROTECTED] AB> I am loathe to roll my own - sure there are for