Ол жарамды ма және ол жұмыс істей ме? Егер сіз Perl сценарийлерінде және бағдарламаларында кез келген жерде электрондық пошта мекенжайларын жинаса немесе қолданатын болсаңыз, жұмыс істемейтін көптеген мекендерді жинай аласыз. Домендік атаудан хат болмауы мүмкін, екіншісінде рұқсат етілмеген сипат бар.
Оның жарамсыздығының себептері қандай болса да, сіз бұзылған мекен-жайыңызды ұстап алғыңыз келеді - пайдаланушыға қайтадан кіруге немесе еш жерде жүрмегеніне сенімді емес электрондық поштаны жібермеу үшін.
Perl-да, әрине, күрделі тұрақты өрнек жасай аласыз; немесе сіз кірістірілген және домен атауларын тексере алатын ыңғайлы модульге ауыссаңыз.
Perl арқылы электрондық пошта мекенжайларын тексеру
Perl сценарийінде немесе бағдарламасында жақсы қалыптасқан және жарамдылық үшін электрондық пошта мекенжайларын тексеру үшін:
- Егер веб-пішінге пайдаланушылар электрондық пошта мекенжайларын енгізсеңіз , HTML кодын электронды растауды жасаңыз .
- Электрондық пошта: Valid-> мекенжайын ('') Email: Valid CPAN Perl модулін пайдаланыңыз; бөлшектерді, орнатуды және мысалдарды төменде қараңыз.
Электрондық пошта: Жарамды электрондық пошта мекенжайын тексеру мысалдары
$ Email_address деп болжанатын мекен-жайды тексеретін болсаңыз, оның жарамдылығын тексере аласыз:
#! / usr / bin / perl пайдалану Email: Valid $ email_address = 'мені мысал мысал'; '; егер (Email: Valid-> address ($ email_address)) {# Электрондық пошта мекенжайы жарамды} else {# Электрондық пошта мекенжайы жарамсыз}Сондай-ақ, электрондық пошта болуы мүмкін: жарамды жоғарғы деңгейлі домендер үшін жарамды тексеру («.com», «.net», «.cn» немесе басқа жарамды домен атауы электрондық пошта мекенжайының ең соңында екенін тексеріңіз). Net :: Domain :: TLD модулі орнатылғанын тексеріңіз.
#! / usr / bin / perl пайдалану Email: Valid $ email_address = 'мені мысал мысал'; '; егер (Email: Valid-> address (--address => $ email_address, -tldcheck => 1)) {# Электрондық пошта мекенжайы жарамды} else {# Электрондық пошта мекенжайы жарамсыз}Электрондық поштаны орнату :: Valid Perl модулі
Электрондық пошта мекенжайы дұрыстығын тексеру үшін Perl орнатуыңызды электрондық пошта: жарамды модульмен жабдықтау үшін:
- Пәрмен жолын ашыңыз.
- Mac және Linux астында Terminal қосымшасын ашыңыз, мысалы.
- Sudo perl -MCPAN -e 'e-mail орнату :: Valid (Mac және Linux) немесе perl -MCPAN -e' email орнату :: Valid.
- Enter пернесін басыңыз.
- Супер пайдаланушы құпия сөзін енгізіп , сұралса, Enter пернесін басыңыз.
- Сұрақ Мүмкіндігінше автоматты түрде конфигурациялауды қалайсыз ба? , егер сіз білмесеңіз, «иә» таңдаңыз
- Сұрақ Интернетке қосылуға тырысу дұрыс ба? , «иә» де енгізіңіз.