Perl ile E-posta Adreslerini Doğrulama

Geçerli mi ve işe yarayacak mı? Perl komut dosyalarınız ve programlarınızda herhangi bir yerde e-posta adresleri toplar veya kullanırsanız, çalışmayan birçok adresi toplayabilirsiniz. Biri alan adında bir harf eksik olabilir, bir başkası izin verilmeyen bir karaktere sahip olabilir.

Geçersizliğinin nedenleri ne olursa olsun, kırılmış adresi yakalamak istersiniz - kullanıcının tekrar girmesini istemek veya bir yere gitmeyecek bir e-posta göndermekten kaçınmak için.

Perl'de, karmaşık bir düzenli ifadeyi elbette kurabilirsiniz; ya da zaten bir tane yerleşik olan ve alan adlarını da kontrol edebilen kullanışlı bir modüle dönersiniz.

Perl ile E-posta Adreslerini Doğrulayın

Perl komut dosyasında veya programında iyi oluşluk ve geçerlilik için e-posta adreslerini kontrol etmek için:

Email :: Geçerli E-posta Adresi Doğrulama Örnekleri

$ Email_address'in kontrol edilecek adresi tuttuğunu varsayarak, geçerliliğini aşağıdakileri kullanarak kontrol edebilirsiniz:

#! / usr / bin / perl kullanın Email :: Valid $ email_address = 'me @@ example.com'; if (Email :: Valid-> address ($ email_address)) {# E-posta adresi geçerlidir} else {# E-posta adresi geçerli değil}

Ayrıca, geçerli üst düzey alan adları için Email :: Valid kontrolüne sahip olabilirsiniz (".com", ".net", ".cn" veya başka geçerli alan adının e-posta adresinin sonundaki olduğundan emin olun). Net :: Domain :: TLD modülünün kurulu olduğundan emin olun.

#! / usr / bin / perl kullanın Email :: Valid $ email_address = 'me @@ example.com'; if (Email :: Valid-> address (-address => $ email_address, -tldcheck => 1)) {# E-posta adresi geçerlidir} else {# E-posta adresi geçerli değil}

Email :: Valid Perl Modülünü Yükleyin

Perl kurulumunuzu e-posta adresi doğruluğunu onaylamak için Email :: Valid modülü ile donatmak için: