in reply to Capture Email address

Find out what characters are allowed in domain names. IIRC, they are a-z, 0-9, ".", "_" and "-". Make a character class of it:
if ( /(abuse\@[a-zA-Z0-9\.\-]+)/ )

[download]


Note: untested

In Section Seekers of Perl Wisdom