Yes, I can put const. strings like "REMOVE thIS @ ... " but this is not clear solution.$_ = q{mitpoet "@" mit.edu}; $_ =~ s/^([\w+-?\.?]+)\W*[\@|at]\W*([\w+-?\.?]+)/$1\@$2/i; die $_,$/ #output: mitpoet@mit.edu
In reply to email address hiding by sh1tn
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |