क्या यह मान्य है, और यह काम करेगा? यदि आप अपनी पर्ल स्क्रिप्ट और प्रोग्राम में कहीं भी ईमेल पते एकत्र या उपयोग करते हैं, तो संभवतः आप कई पते एकत्र करते हैं जो काम नहीं करते हैं। किसी को डोमेन नाम में एक पत्र की कमी हो सकती है, दूसरे के पास एक अस्वीकृत चरित्र बहुत अधिक हो सकता है।
इसकी अमान्यता के कारण जो भी कारण हैं, आप टूटे हुए पते को पकड़ना चाहते हैं - उपयोगकर्ता को फिर से प्रवेश करने के लिए संकेत देने के लिए, या एक ईमेल भेजने से बचने के लिए जो कहीं भी जाना सुनिश्चित नहीं है।
पर्ल में, आप निश्चित रूप से एक जटिल नियमित अभिव्यक्ति बना सकते हैं; या आप एक आसान मॉड्यूल पर जाते हैं जिसमें पहले से ही एक बनाया गया है और डोमेन नाम भी देख सकता है।
पर्ल के साथ ईमेल पते मान्य करें
पर्ल स्क्रिप्ट या प्रोग्राम में अच्छी तरह से गठबंधन और वैधता के लिए ईमेल पते की जांच करने के लिए:
- यदि आपके पास उपयोगकर्ता वेब पते में ईमेल पते टाइप करते हैं तो HTML कोड में ईमेल सत्यापन बनाएं ।
- ईमेल :: वैध-> पता ('') ईमेल :: वैध सीपीएएन पर्ल मॉड्यूल से उपयोग करें; विवरण, स्थापना और उदाहरणों के लिए नीचे देखें।
ईमेल :: मान्य ईमेल पता सत्यापन उदाहरण
मान लें कि $ email_address पते को चेक करने के लिए रखता है, आप इसका उपयोग करके इसकी वैधता जांच सकते हैं:
#! / usr / bin / perl उपयोग ईमेल :: मान्य $ email_address = 'me @@ example.com'; अगर (ईमेल :: मान्य-> पता ($ email_address)) {# ईमेल पता मान्य है} अन्य {# ईमेल पता मान्य नहीं है}आपके पास वैध शीर्ष-स्तरीय डोमेन के लिए ईमेल :: मान्य जांच भी हो सकती है (सुनिश्चित करें कि ".com", ".net", ".cn" या कोई अन्य वैध डोमेन नाम ईमेल पते के बहुत अंत में है)। सुनिश्चित करें कि नेट :: डोमेन :: टीएलडी मॉड्यूल स्थापित है।
#! / usr / bin / perl उपयोग ईमेल :: मान्य $ email_address = 'me @@ example.com'; अगर (ईमेल :: मान्य-> पता (-address => $ email_address, -tldcheck => 1)) {# ईमेल पता मान्य है} अन्य {# ईमेल पता मान्य नहीं है}ईमेल :: मान्य पर्ल मॉड्यूल स्थापित करें
ईमेल पर्ल स्थापना को वैध करने के लिए ईमेल :: मान्य मॉड्यूल के साथ अपनी पर्ल स्थापना को लैस करने के लिए:
- एक कमांड प्रॉम्प्ट खोलें।
- मैक और लिनक्स के तहत, टर्मिनल एप्लिकेशन खोलें, उदाहरण के लिए।
- Sudo perl-mCPAN -e 'इंस्टॉल करें ईमेल :: मान्य' (मैक और लिनक्स) या perl-mCPAN -e 'ईमेल इंस्टॉल करें :: मान्य'।
- एंटर दबाएं।
- सुपर उपयोगकर्ता पासवर्ड दर्ज करें और संकेत दिए जाने पर एंटर दबाएं।
- पूछा गया क्या आप मुझे जितना संभव हो सके कॉन्फ़िगर करना चाहते हैं? , जब तक आप जानते हों "हां" चुनें
- यह पूछे जाने पर इंटरनेट से कनेक्ट करने का प्रयास करना ठीक है? , "हाँ" भी दर्ज करें।