pattern match

wolverina has asked for the wisdom of the Perl Monks concerning the following question:

Any hints on how to parce an email address from a line in a file?

<STRONG><STRONG>user_name\@hotmail.com</STRONG></STRONG> ";
[download]

Perhaps use grip to milk the email address from the line? Lisa.

Comment on pattern match Download Code

Replies are listed 'Best First'.
Re: pattern match by Rich36 (Chaplain) on Aug 14, 2002 at 20:57 UTC
Or you could use Email::Find - "Find RFC 822 email addresses in plain text" «Rich36»	[reply]
My $0.02 on email addys by BorgCopyeditor (Friar) on Aug 14, 2002 at 20:58 UTC
`perldoc -q mail perldoc -q address perldoc -q valid Email::Valid` [download] BCE --Your punctuation skills are insufficient!	[reply] [d/l]
Re: pattern match by Nightblade (Beadle) on Aug 14, 2002 at 20:46 UTC
1 way. `$line =~ /<STRONG><STRONG>(.+)<\/STRONG><\/STRONG>/;` [download] 2 way. `$line = /([\w\.\-\_]+\@[\w\.\-]+\.\w{2,6})/; $email = $1;` [download]	[reply] [d/l] [select]