Este valabil și va funcționa? Dacă colectați sau utilizați adrese de e-mail oriunde în script-urile și programele Perl, colectați eventual multe adrese care nu funcționează. S-ar putea să lipsească o scrisoare în numele domeniului , altul ar putea avea un caracter nepermis prea mult.
Oricare ar fi motivele pentru invaliditate, doriți să prindeți adresa ruptă - pentru a solicita utilizatorului să reintroducă poate, sau pentru a evita trimiterea unui e-mail care să fie sigur că nu merge nicăieri.
În Perl, puteți crea o expresie regulată complicată, desigur; sau vă întoarceți la un modul la îndemână care are deja unul încorporat și poate verifica și numele de domeniu.
Validați adresele de e-mail cu Perl
Pentru a verifica adresele de e-mail pentru bine format și validitate într-un script sau program Perl:
- Creați validarea e-mailului în codul HTML dacă aveți utilizatori de tip adrese de e-mail într-un formular web.
- Utilizați adresa de e-mail :: Valid-> address ('') din modulul Email :: Valid CPAN Perl; vedeți mai jos pentru detalii, instalare și exemple.
Email :: Validarea exemplelor de validare a adresei de e-mail
Presupunând că adresa $ email_address deține adresa care urmează să fie verificată, puteți verifica validitatea acesteia utilizând:
#! / usr / bin / perl utilizează Email :: Valid $ email_address = 'me @@ example.com'; dacă adresa de e-mail este validă altfel {# Adresa de e-mail nu este validă}Puteți, de asemenea, să aveți e-mail :: Verificare validă pentru domenii valide de nivel înalt (asigurându-vă că ".com", ".net", ".cn" sau un alt nume de domeniu valabil se află la sfârșitul adresei de e-mail). Asigurați-vă că modulul Net :: Domain :: TLD este instalat.
#! / usr / bin / perl utilizează Email :: Valid $ email_address = 'me @@ example.com'; dacă adresa e-mail este validă altfel {# Adresa de e-mail nu este validă}Instalați modulul Email :: Valid Perl
Pentru a vă echipa echipamentul Perl cu modulul Email :: Valid pentru validarea corectitudinii adresei de e-mail:
- Deschideți un prompt de comandă.
- Sub Mac și Linux, deschideți de exemplu aplicația Terminal.
- Tastați sudo perl -MCPAN -e 'instalați Email :: Valid' (Mac și Linux) sau perl -MCPAN -e 'instalați Email :: Valid'.
- Apăsați Enter .
- Introduceți parola de super-utilizator și apăsați Enter dacă vi se solicită.
- Întrebat Doriți să configurez cât mai mult posibil în mod automat? , alegeți "da", dacă nu știți
- Întrebat Este bine să încercați să vă conectați la Internet? , introduceți și "da".