in reply to RegEx to find the index of the character '@' in an Email address

perl -le '$email=q[abcdef@gmail.com];($username,$domainname)=$email=~/^(.*?)\@(.*?)$/;print $username,"\t",$domainname'

output

abcdef gmail.com

~suhail
  • Comment on Re: RegEx to find the index of the character '@' in an Email address
  • Download Code

In Section Seekers of Perl Wisdom