Scot Robnett wrote: > Hey y'all, I got over my brain cramp and thought I'd share with the group in > case it helps anyone trying to do something similar. I was making it way too > complicated. All I needed was: > > if($email !~ /\w+@\w+\.\w{2,4}/) > { > # error stuff here > }
have you considered using email::valid? http://search.cpan.org/search?dist=Email-Valid -- To unsubscribe, e-mail: [EMAIL PROTECTED] For additional commands, e-mail: [EMAIL PROTECTED]