Si të Validoni Adresat Email me Perl

A është e vlefshme dhe a do të funksionojë? Nëse mbledhni ose përdorni adresa emailesh kudo në Script dhe programin tuaj Perl, mund të mbledhni shumë adresa që nuk punojnë. Një mund të mungojë një letër në emër domain , një tjetër mund të ketë një karakter të ndaluar shumë.

Cilado qoftë arsyeja për pavlefshmërinë e saj, ju doni të kapni adresën e thyer - të nxisni përdoruesin të ri-hyjë ndoshta, ose të mos dërgoni një email që është i sigurt për të shkuar askund.

Në Perl, ju mund të krijoni një shprehje të rregullt të komplikuar, sigurisht; ose ju ktheheni në një modul të dobishëm që tashmë ka një ndërtuar në dhe mund të kontrollojë emrat e domain, too.

Validoni adresat e emailit me Perl

Për të kontrolluar adresat e emailit për formimin e mirë dhe vlefshmërinë në një skript apo program Perl:

• Ndërtimi i validimit të email-it në kodin HTML nëse keni përdorues të tipit adresat e emailit në një formë të uebit.
• Përdorni Email :: Valid-> address ('') nga Email :: Valid CPAN Moduli Perl; shih më poshtë për detaje, instalime dhe shembuj.

Email :: Shembuj të vlefshmërisë së adresës së emailit të vlefshëm

Duke supozuar se adresa $ email mban adresën që do të kontrollohet, mund të kontrolloni vlefshmërinë e saj duke përdorur:

#! / usr / bin / perl përdor Email :: Valid $ email_address = 'me @@ example.com'; nëse (Email :: Valid-> adresë ($ email_address)) {# Adresa e emailit është e vlefshme} tjetër {# Adresa e postës elektronike nuk është e vlefshme}

Ju gjithashtu mund të keni Email :: Kontrollo të vlefshme për domenet e vlefshme të nivelit të lartë (duke u siguruar që ".com", ".net", ".cn" ose një tjetër emër domain i vlefshëm është në fundin e emailit). Sigurohuni që moduli Net :: Domain :: TLD është instaluar.

#! / usr / bin / perl përdor Email :: Valid $ email_address = 'me @@ example.com'; nëse (Email :: Valid-> address (-adress => $ email_address, -tldcheck => 1)) {# Adresa e emailit është e vlefshme} tjetër {# Adresa e emailit nuk është e vlefshme}

Instaloni Email :: Valid Perl Module

Për të pajisur instalimin tuaj Perl me modulin Email :: Valid për të vërtetuar korrektësinë e adresës së postës elektronike:

• Hapni një urdhër të komandës.
  • Nën Mac dhe Linux, hapni aplikacionin Terminal, për shembull.
• Type sudo perl -MCPAN -e 'instaloni Email :: Valid' (Mac dhe Linux) ose perl -MCPAN -e 'instaloni Email :: Valid'.
• Shtypni Enter .
  • Futni fjalëkalimin e përdoruesit super dhe shtypni Enter nëse kërkohet.
  • I pyetur A dëshironi që unë të konfiguroj sa më shumë që të jetë e mundur automatikisht? , zgjidhni "po" nëse nuk e dini
  • I pyetur A është OK për t'u përpjekur të lidheni me internet? , futni edhe "po".