それは有効なのでしょうか? あなたがPerlのスクリプトやプログラムのどこにいても電子メールアドレスを収集したり使用したりすると、動作しない多くのアドレスを収集する可能性があります。 ドメイン名には手紙がないかもしれないし、許可されていない文字が多すぎるかもしれない。
その無効の理由が何であれ、壊れたアドレスをキャッチしたい、ユーザーに再入力を促す、またはどこにも行かないことが確実な電子メールを送信しないようにする。
Perlでは、複雑な正規表現を組み立てることができます。 既にドメイン名が組み込まれていて、ドメイン名を確認できる便利なモジュールになっている場合もあります。
Perlによる電子メールアドレスの検証
Perlのスクリプトやプログラムで整形式と妥当性の電子メールアドレスを確認するには:
- ユーザーが電子メールアドレスをWebフォームに入力した場合、HTMLコードに電子メールの検証を構築します 。
- Email :: Valid CPL PerlモジュールからEmail :: Valid-> address( '')を使用してください。 詳細、インストール、および例については、以下を参照してください。
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モジュールを装備して電子メールアドレスの正しさを検証するには:
- コマンドプロンプトを開きます。
- MacやLinuxでは、Terminalアプリケーションを開きます。
- sudo perl -MCPAN -e 'install Email :: Valid'(MacおよびLinux)またはperl -MCPAN -e 'install Email :: Valid'と入力します。
- Enterを押します。
- スーパーユーザのパスワードを入力し 、プロンプトが表示されたらEnterを押します。
- あなたは自動的にできるだけ多くの設定をしたいですか? あなたが知らない限り「はい」を選択してください
- 質問インターネットに接続しようとしても問題ありませんか? 「はい」と入力してください。