¿É válido e funcionará? Se recompila ou usa enderezos de correo electrónico en calquera lugar das súas secuencias de comandos e programas de Perl, posiblemente recollerá moitas direccións que non funcionen. É posible que faltan unha carta no nome de dominio , outra pode ter un carácter non autorizado.
Sexa cal for o motivo da súa invalidez, quere incorporarse o enderezo roto - para que o usuario volva ingresar quizais ou para evitar enviar un correo electrónico que non vai a sitio.
En Perl, podes atopar unha expresión regular complicada, por suposto; ou se dirixe a un módulo práctico que xa incorporou e pode comprobar os nomes de dominio tamén.
Valide enderezos de correo electrónico con Perl
Para consultar os enderezos de correo electrónico para a boa conformidade e validez nun script ou programa de Perl:
- Construír a validación do correo electrónico no código HTML se ten os usuarios escribir enderezos de correo electrónico nun formulario web.
- Use o correo electrónico :: Validar-> enderezo ('') do módulo Perl de correo electrónico: :: válido CPAN; vexa a continuación para obter detalles, instalación e exemplos.
Correo electrónico :: Exames válidos de validación de enderezo de correo electrónico
Supoñendo que $ email_address mantén a dirección a verificar, pode comprobar a súa validez usando:
Usar o uso de #! / usr / bin / perl :: Válido $ email_address = 'me @@ example.com'; se (Email :: Valid-> enderezo ($ email_address)) {# O enderezo de correo electrónico é válido} else {# O enderezo de correo electrónico non é válido}Tamén pode ter un correo electrónico: verificación válida de dominios de nivel superior válidos (asegurándose de que ".com", ".net", ".cn" ou outro nome de dominio válido estea no extremo final da dirección de correo electrónico). Asegúrese de que o módulo Net :: Domain :: TLD está instalado.
Usar o uso de #! / usr / bin / perl :: Válido $ email_address = 'me @@ example.com'; se (Email :: Valid-> address (-address => $ email_address, -tldcheck => 1)) {# O enderezo de correo electrónico é válido} else {# O enderezo de correo electrónico non é válido}Instalar o correo electrónico :: Módulo Perl válido
Para equipar a instalación de Perl co módulo Email :: Valid para validar a corrección do enderezo de correo electrónico:
- Abre un símbolo do sistema.
- En Mac e Linux, abra a aplicación Terminal, por exemplo.
- Tipo sudo perl -MCPAN -e'instalación Email :: Valid '(Mac e Linux) ou perl -MCPAN -e' instalar Correo electrónico: Válido '.
- Preme Intro .
- Introduza o contrasinal do superusuario e prema Intro se se lle solicita.
- Preguntado ¿Quere configuralo tanto como sexa posible de forma automática? , escolla "si" a non ser que saiba
- Preguntado ¿É correcto intentar conectarte a Internet? , ingrese "si" tamén.