in reply to RegExp help
If you're not good at RegEx, I wouldn't suggest trying to parse email addresses with them. It's harder than it looks and you can get yourself into trouble using regular expressions like that.
Instead, try something like Email::Valid. From the docs for Email::Valid:
use Email::Valid; print (Email::Valid->address('me@example.com') ? 'yes' : 'no');
Cheers,
Brent
-- Yeah, I'm a Delt.
In Section
Seekers of Perl Wisdom