(ar0n: Email::Valid) Re: Validating Email

[ar0n]

Check out Email::Valid on CPAN or see the search results for email validate for more discussion on this topic.

use Email::Valid;

print "'$email' is ", Email::Valid->address($email) ? "valid" : "inval
+id";

[ ar0n -- want job (boston) ]