Je to platné a bude to fungovať? Ak zhromažďujete alebo používate e-mailové adresy kdekoľvek v skriptoch a programoch Perl, môžete zhromaždiť mnoho adries, ktoré nefungujú. Chýba písmeno v názve domény , iný môže mať zakázaný charakter príliš veľa.
Bez ohľadu na dôvody jeho neplatnosti chcete chýbať zlomená adresa - vyzvať používateľa, aby znova vstúpil, alebo aby sa vyhli posielaniu e-mailu, ktorý určite nebude nikam.
V programe Perl môžete samozrejme vytvoriť komplikovaný regulárny výraz; alebo sa obrátite na užitočný modul, ktorý už má vstavaný a môže kontrolovať aj názvy domén.
Overenie e-mailových adries s Perl
Ak chcete skontrolovať e-mailové adresy pre dobre formovanosť a platnosť v skripte alebo programe Perl:
- Vytvorte validáciu e-mailu do kódu HTML, ak používate e-mailových adries do webového formulára.
- Použite Email :: Valid-> address ('') z modulu Email: Valid CPAN Perl; podrobnosti, inštalácie a príklady nájdete nižšie.
E-mail :: Platné príklady validácie e-mailovej adresy
Za predpokladu, že adresa $ email_address obsahuje adresu, ktorú chcete skontrolovať, môžete skontrolovať jej platnosť pomocou:
#! / usr / bin / perl použitie Email :: Platné $ email_address = 'me @@ example.com'; ak (E-mail :: Platné-> adresa ($ email_address)) {# E-mailová adresa je platná} iná {# E-mailová adresa nie je platná}Môžete tiež mať e-mail :: Platná kontrola pre platné domény najvyššej úrovne (uistite sa, že ".com", ".net", ".cn" alebo iný platný názov domény je na konci e-mailovej adresy). Skontrolujte, či je nainštalovaný modul Net :: Domain :: TLD.
#! / usr / bin / perl použitie Email :: Platné $ email_address = 'me @@ example.com'; (E-mail: Valid-> address (-address => $ email_address, -tldcheck => 1)) {# E-mailová adresa je platná} iná {# E-mailová adresa nie je platná}Nainštalujte modul Email :: Valid Perl
Zariadenie Perl vybavte modulom Email :: Valid na overenie správnosti e-mailovej adresy:
- Otvorte príkazový riadok.
- V systéme Mac a Linux otvorte napríklad aplikáciu Terminál.
- Zadajte sudo perl -MCPAN -e 'nainštalujte Email :: Valid' (Mac a Linux) alebo perl -MCPAN -e 'nainštalujte Email :: Valid'.
- Stlačte kláves Enter .
- Zadajte heslo pre super používateľov a po výzve stlačte kláves Enter .
- Na otázku Ak chcete nastaviť čo najviac automaticky? , vyberte "áno", ak neviete
- Na otázku: Je v poriadku pokúsiť sa pripojiť k internetu? , zadajte aj "áno".