perlでメールアドレスが正しいかチェックするには、有名な メールアドレスの正規表現 を使うしか無いのかなあと思ってたのだが、不正なメールアドレスの正規表現でもいいよなあ。でもそういうの作ってる人いないみたい。

自分でRFC2822読み込んで作るほど暇でもないので、どうにかならんかと思ってたら、perldoc9にそのまんまずばりの「How do I check a valid mail address?」てのがあった。

You can use the Email::Valid or RFC::RFC822::Address which check the format of the address, although they cannot actually tell you if it is a deliverable address (i.e. that mail to the address will not bounce).

だそうで、到達可能なメアドかはともかく正当なメアドであることはチェックできるモジュールがあるそうだ。ちなみにこの項目にはちゃんと到達可能なメアドかチェックするスクリプトも掲載されてる。が、まあ普通は使わんわな。いちいちDNS引いて云々などやっとれん。

(@858)