Perlで電子メールアドレスを検証する方法

それは有効なのでしょうか? あなたがPerlのスクリプトやプログラムのどこにいても電子メールアドレスを収集したり使用したりすると、動作しない多くのアドレスを収集する可能性があります。 ドメイン名には手紙がないかもしれないし、許可されていない文字が多すぎるかもしれない。

その無効の理由が何であれ、壊れたアドレスをキャッチしたい、ユーザーに再入力を促す、またはどこにも行かないことが確実な電子メールを送信しないようにする。

Perlでは、複雑な正規表現を組み立てることができます。 既にドメイン名が組み込まれていて、ドメイン名を確認できる便利なモジュールになっている場合もあります。

Perlによる電子メールアドレスの検証

Perlのスクリプトやプログラムで整形式と妥当性の電子メールアドレスを確認するには:

Email ::有効な電子メールアドレス検証の例

$ email_addressがチェックされるアドレスを保持していると仮定すると、次のようにしてその有効性をチェックすることができます:

#!/ usr / bin / perl use Email ::有効な$ email_address = '私@@ example.com'; if(Email :: Valid-> address($ email_address)){#電子メールアドレスが有効です} else {#電子メールアドレスが無効です}

また、有効なトップレベルドメイン( ".com"、 ".net"、 ".cn"または別の有効なドメイン名が電子メールアドレスの最後にあることを確認する)に対してEmail :: Validチェックを行うこともできます。 Net :: Domain :: TLDモジュールがインストールされていることを確認します。

#!/ usr / bin / perl use Email ::有効な$ email_address = '私@@ example.com'; if(電子メール::有効なアドレス(-address => $ email_address、-tldcheck => 1)){#電子メールアドレスは有効です} else {#電子メールアドレスは無効です}

Email :: Valid Perlモジュールのインストール

PerlのインストールにEmail :: Validモジュールを装備して電子メールアドレスの正しさを検証するには: