Re: How can I extract the username/domain?

Replies are listed 'Best First'.
Re^2: How can I extract the username/domain? by vaflinux (Initiate) on Jun 23, 2011 at 10:49 UTC
$1 and $2 doesn't print anything. its ooutpu is blank. Pls provide me the full code.	[reply]
Re^2: How can I extract the username/domain? by vaflinux (Initiate) on Jun 23, 2011 at 11:21 UTC
$1 and $2 not providing any output. it is giving blank output. My code is: $email = "old@oldone.com"; if ($email =~ /(^@+)@(.+)/) { #if ($email =~ /<(.+?)@(.+?)>/) { print "username is $1\n"; print "hostnmae is $2\n"; }	[reply]
Re^3: How can I extract the username/domain? by Anonymous Monk on Jun 23, 2011 at 11:50 UTC
Hi, new questions go in Seekers Of Perl Wisdom because Symuc, who originally asked the question, hasn't been here in 9 years. fuzzysteve, whom you asked a question, hasn't been here in 2 years. Code/data goes in `<code> between code tags </code>` Welcome, see How do I post a question effectively?, Where should I post X? The regex which is not working for you, contains angle brackets, because in the sample data , the email was surrounded by angle brackets. You can use YAPE::Regex::Explain to get an explanation of regex For a really real email regex :) use Email::Find	[reply]