libemail-valid-loose-perl | Email::Valid which allows dot immediately before at mark | Mehr ...
Email::Valid::Loose is a subclass of Email::Valid, which allows dot (.) immediately before at-mark (@). It is invalid in RFC822, but is commonly used in some of mobile phone addresses in Japan (like docomo.ne.jp or jp-t.ne.jp).