És vàlid i funcionarà? Si recopileu o utilitzeu adreces de correu electrònic en qualsevol lloc dels scripts i programes de Perl, possiblement recopileu moltes adreces que no funcionen. Es pot perdre una carta del nom del domini , un altre pot tenir massa caràcter desautoritzat.
Sigui quina sigui la raó de la seva nul·litat, voleu capturar l'adreça trencada - per demanar a l'usuari que torneu a introduir, potser, o per evitar l'enviament d'un correu electrònic que estigui segur d'anar enlloc.
A Perl, podeu comprovar una expressió regular complicada, és clar; o bé es dirigeix a un mòdul pràctic que ja s'ha integrat i que també pot comprovar els noms de domini.
Valideu adreces de correu electrònic amb Perl
Per comprovar les adreces de correu electrònic per a la benformitat i la validesa d'un script o programa de Perl:
- Creeu la validació del correu electrònic en el codi HTML si teniu els usuaris escriure adreces de correu electrònic en un formulari web.
- Utilitzeu l'adreça de correu electrònic: vàlid-> adreça ('') del mòdul Perl de correu electrònic :: vàlid CPAN; vegeu a continuació els detalls, la instal·lació i els exemples.
Correu electrònic: Exemples de validació d'adreça electrònica vàlida
Si assumeix $ email_address manté l'adreça que es vol comprovar, podeu comprovar-ne la validesa utilitzant:
#! / usr / bin / perl use Correu electrònic: vàlid $ email_address = 'me @@ example.com'; si (Email :: Valid-> address ($ email_address)) {# The email address is valid} else {# the email address is not valid}També podeu tenir el correu electrònic: verificació vàlida per als dominis de nivell superior vàlids (assegureu-vos que ".com", ".net", ".cn" o un altre nom de domini vàlid arribin a la mateixa adreça de correu electrònic). Assegureu-vos que el mòdul Net :: Domain :: TLD està instal·lat.
#! / usr / bin / perl use Correu electrònic: vàlid $ email_address = 'me @@ example.com'; si (Email :: Valid-> address (-address => $ email_address, -tldcheck => 1)) {# The email address is valid} else {# The email address is not valid}Instal·leu el correu electrònic :: Mòdul Perl vàlid
Per equipar la vostra instal·lació de Perl amb el mòdul Email :: Valid per validar la correcció de l'adreça de correu electrònic:
- Obriu un símbol del sistema.
- A Mac i Linux, obriu l'aplicació Terminal, per exemple.
- Escriviu sudo perl -MCPAN -i 'instal·leu el correu electrònic: vàlid "(Mac i Linux) o perl -MCPAN -i' instal·leu el correu electrònic: vàlid".
- Premeu Retorn .
- Introduïu la contrasenya de superusuari i premeu Retorn si es demana.
- Preguntat ¿Voleu que configureu el màxim possible? , trieu "sí" tret que ho sàpiga
- Preguntat ¿És correcte intentar connectar-se a Internet? , introduïu també "sí".