Momwe mungavomerezere ma Adresse a Imeli ndi Perl

Kodi ndi yoyenera, ndipo idzagwira ntchito? Mukakusonkhanitsa kapena kugwiritsa ntchito ma imelo pamapulogalamu anu ndi mapulogalamu, mumatha kusonkhanitsa maadiresi ambiri omwe sagwira ntchito. Munthu sangakhale ndi kalata mu dzina lake , wina akhoza kukhala ndi khalidwe losaloledwa kwambiri.

Zirizonse zomwe zimayambitsa vutoli, mukufuna kupeza adilesi yosweka - kuchititsa wogwiritsa ntchito kuti abwererenso mwinamwake, kapena kupewa kutumiza imelo yomwe sizitha kupita kwina kulikonse.

Mu Perl, mukhoza kugwirizanitsa zovuta nthawi zonse, ndithudi; kapena mutembenukira ku gawo lothandizira limene lamangidwanso kale ndipo mukhoza kuyang'ana mayina awo, komanso.

Lembani Maadiresi a Imeli ndi Perl

Kuti muyang'ane ma adelo a ma email kuti apangidwe bwino komanso kuti muyambe kulembedwa pulogalamu kapena pulogalamu ya Perl:

Imelo :: Zitsanzo Zotsimikiziridwa Zowonjezera Ma Imeli

Kuganiza kuti $ imelo_address imagwirizira adiresi kuti ifufuze, mungathe kuwona kuyenera kwake pogwiritsa ntchito:

#! / usr / bin / perl ntchito Email :: Valid $ email_address = 'me @@ example.com'; ngati (Imelo :: Valid-> address ($ email_address)) {# Imelo imalembera} kenanso {# Imelo imelo siilondola}

Mungathe kukhalanso ndi Email :: Valid check for domains yolondola-level domains (kuonetsetsa ".com", ".net", ".cn" kapena dzina linalake lovomerezeka lili pamapeto a adiresi). Onetsetsani kuti Net :: Domain :: TLD module yayikidwa.

#! / usr / bin / perl ntchito Email :: Valid $ email_address = 'me @@ example.com'; ngati (Imelo :: Valid-> address (-address => $ email_address, -tldcheck => 1)) {# Imelo imalembera} china {# Imelo imalephera}

Ikani Imelo :: Valid Perl Module

Kukonzekera kuika kwanu kwa Perl ndi Email :: Valid module yovomerezera imelo yeniyeni: