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
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
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]> ???/ ?
???
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]
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