Indlela yokuqinisekisa iiAilesi ze-imeyile kunye nePerl

Ngaba iyasebenza, kwaye iya kusebenza? Ukuba uqokelela okanye usebenzise iidilesi ze-imeyli naphina kwiempendulo zePerk kunye neenkqubo, unokuqokelela iidilesi ezininzi ezingasebenzi. Omnye unokungabikho kwileta egameni lesizinda , omnye unokufumana unobunzima obungavunywanga kakhulu.

Kungakhathaliseki ukuba ziphi izizathu zokungasebenzi kwayo, ufuna ukufumana idilesi ephukileyo - ukunyusa umsebenzisi ukuba angene kwakhona mhlawumbi, okanye ukuphepha ukuthumela i-imeyile engaqinisekanga ukuba ayikho ndawo.

Kwi-Perl, unokuqulunqa umboniso oqhelekileyo, ngokuqinisekileyo; okanye uphendukela kwimodyuli ekhompyutheni esele yakhiwe kuyo kwaye unokwazi ukujonga amagama wesizinda, kwakhona.

Qinisekisa iileyile ze-imeyili kunye nePerl

Ukuqwalasela iidilesi ze-imeyile malunga nokubunjwa kakuhle kunye nokusebenza kwiskripthi sePerl okanye inkqubo:

I-Imeyile :: Iimpawu eziqinisekileyo zeNgcaciso zeeNkcukacha ze-imeyile

Ukucinga ukuba i-imeyile imeyile_address ithatha idilesi ukuba ihlolwe, ungakhangela ukufaneleka kwayo usebenzisa:

#! / usr / bin / perl sebenzisa i-imeyli :: I-$ eqinisekisiwe imeyli_address = 'me @ example.com.com; ukuba (i-imeyli :: i-Valid-> idilesi (i-email email_address)) {# Idilesi ye-imeyile iyasebenza} enye {# Idilesi ye-imeyile ayivumelekanga}

Ungakwazi kwakhona ukuba ne-imeyile :: Utshintsho oluqinisekileyo kwiindawo ezisemgangathweni zamanqanaba aphezulu (ukuqinisekisa ukuba ".com", ".net", ".cn" okanye elinye igama lesizinda elisemthethweni likuphela kwedilesi ye-imeyile). Qinisekisa ukuba i-Net :: Domain :: I-module ye-TLD ifakiwe.

#! / usr / bin / perl sebenzisa i-imeyli :: I-$ eqinisekisiwe imeyli_address = 'me @ example.com.com; ukuba (i-imeyli :: i-Valid-> idilesi (-address => $ email_address, -tldcheck => 1)) {# Idilesi ye-imeyile iyasebenza} enye {# Idilesi ye-imeyile ayivumelekanga}

Faka i-imeyile :: I-Modal Valid Perl

Ukuxhobisa iPerl yakho yokufakela nge-imeyile :: Iimodyuli ezivumelekileyo zokuqinisekisa idilesi ye-imeyile yokuchaneka: