มันถูกต้องและมันจะทำงาน? หากคุณรวบรวมหรือใช้ที่อยู่อีเมลในสคริปต์และโปรแกรม Perl คุณอาจรวบรวมที่อยู่จำนวนมากที่ไม่ได้ผล หนึ่งอาจขาดตัวอักษรใน ชื่อโดเมน อื่นอาจมีตัวไม่ได้รับอนุญาตมากเกินไป
ไม่ว่าสาเหตุใดที่ทำให้ไม่สามารถใช้งานได้คุณต้องการจับที่อยู่เสีย - เพื่อแจ้งให้ผู้ใช้ป้อนข้อมูลใหม่หรือเพื่อหลีกเลี่ยงการส่งอีเมลที่ไม่ต้องไปไหน
ใน Perl คุณสามารถสร้างนิพจน์ทั่วไปที่ซับซ้อนได้แน่นอน หรือคุณหันไปใช้โมดูลที่มีประโยชน์ซึ่งมีอยู่แล้วและสามารถตรวจสอบชื่อโดเมนได้เช่นกัน
ตรวจสอบที่อยู่อีเมลด้วย Perl
เพื่อตรวจสอบที่อยู่อีเมลสำหรับความถูกต้องและความถูกต้องในสคริปต์หรือโปรแกรม Perl:
- สร้างการยืนยันอีเมลลงในโค้ด HTML หากคุณมีผู้ใช้พิมพ์ที่อยู่อีเมลลงในแบบฟอร์มทางเว็บ
- ใช้อีเมล์ :: Valid-> address ('') จากโมดูล Email :: Validant CPAN Perl; ดูด้านล่างสำหรับรายละเอียดการติดตั้งและตัวอย่าง
อีเมล :: ตัวอย่างการตรวจสอบที่อยู่อีเมลที่ถูกต้อง
สมมติว่า $ email_address เก็บที่อยู่ที่จะตรวจสอบคุณสามารถตรวจสอบความถูกต้องได้โดยใช้:
#! / usr / bin / perl use อีเมล :: Valid $ email_address = 'me @@ example.com'; if (Email :: Valid-> address ($ email_address)) {# อีเมลแอดเดรสถูกต้อง} else {# ที่อยู่อีเมลไม่ถูกต้อง}คุณยังสามารถใช้อีเมล :: ตรวจสอบโดเมนเนมระดับบนสุดที่ถูกต้อง (ตรวจสอบให้แน่ใจว่า ".com", ".net", ".cn" หรือชื่อโดเมนที่ถูกต้องอีกอันหนึ่งอยู่ที่ท้ายอีเมลแอดเดรส) ตรวจสอบให้แน่ใจว่ามีการติดตั้งโมดูล Net :: Domain :: TLD ไว้
#! / usr / bin / perl use อีเมล :: Valid $ email_address = 'me @@ example.com'; if (Email :: Valid-> address (-address => $ email_address, -tldcheck => 1)) {# ที่อยู่อีเมลถูกต้อง} else {# ที่อยู่อีเมลไม่ถูกต้อง}ติดตั้ง Email :: Valid Perl Module
จัดเตรียมการติดตั้ง Perl ของคุณด้วยโมดูล Email :: Valid เพื่อตรวจสอบความถูกต้องของที่อยู่อีเมล:
- เปิดพรอมต์คำสั่ง
- ใน Mac และ Linux ให้เปิดแอ็พพลิเคชัน Terminal ตัวอย่างเช่น
- พิมพ์ sudo perl -MCPAN -e 'install Email :: Valid' (Mac และ Linux) หรือ perl -MCPAN -e 'install Email :: Valid'
- กด Enter
- ป้อนรหัสผ่านผู้ใช้ขั้นสูงและกด Enter หากได้รับพร้อมท์
- ถาม คุณต้องการให้ฉันกำหนดค่าให้มากที่สุดเท่าที่จะเป็นไปได้โดยอัตโนมัติ? เลือก "ใช่" เว้นแต่คุณจะรู้
- ถาม ว่าสามารถลองเชื่อมต่อกับอินเทอร์เน็ตได้หรือไม่? ให้ป้อน "ใช่" ด้วย