$ perl -Mstrict -MEmail::Valid -wE 'say Email::Valid->address(q{myname@mydomain.com}) ? "valid" : "failed $Email::Valid::Details check"';