ធ្វើដូចម្តេចដើម្បីធ្វើឱ្យមានសុពលភាពអាសយដ្ឋានអ៊ីម៉ែលដោយ Perl

តើវាមានសុពលភាពហើយតើវានឹងដំណើរការដែរឬទេ? ប្រសិនបើអ្នកប្រមូលឬប្រើអាសយដ្ឋានអ៊ីមែលគ្រប់ទីកន្លែងនៅក្នុងស្គ្រីបនិងកម្មវិធី Perl អ្នកអាចប្រមូលអាសយដ្ឋានច្រើនដែលមិនដំណើរការ។ គេអាចខ្វះលិខិតមួយនៅក្នុង ឈ្មោះដែន មួយផ្សេងទៀតអាចមានតួអក្សរដែលមិនអនុញ្ញាតច្រើនពេក។

អ្វីក៏ដោយមូលហេតុនៃភាពមិនត្រឹមត្រូវរបស់វាអ្នកចង់ចាប់អាសយដ្ឋានដែលខូច - ដើម្បីឱ្យអ្នកប្រើបញ្ចូលចូលម្តងទៀតឬដើម្បីចៀសវាងផ្ញើអ៊ីមែលដែលប្រាកដថានឹងទៅកន្លែងណា។

ក្នុង Perl អ្នកអាចបង្កើតការបញ្ចេញមតិធម្មតាដែលមានភាពស្មុគស្មាញ។ ឬអ្នកបានក្លាយជាម៉ូឌុលងាយស្រួលមួយដែលមានរួចហើយបានសាងសង់ឡើងនៅក្នុងនិងអាចពិនិត្យមើលឈ្មោះដែនផងដែរ។

ធ្វើឱ្យអាសយដ្ឋានអ៊ីមែលមានសុពលភាពជាមួយ Perl

ដើម្បីពិនិត្យមើលអាសយដ្ឋានអ៊ីមែលសម្រាប់ភាពត្រឹមត្រូវនិងភាពត្រឹមត្រូវក្នុងស្គ្រីប Perl ឬកម្មវិធី:

• បង្កើតសុពលភាពអ៊ីមែលទៅក្នុងកូដ HTML ប្រសិនបើអ្នកមានអ្នកប្រើវាយអាសយដ្ឋានអ៊ីមែលទៅក្នុងសំណុំបែបបទបណ្ដាញ។
• ប្រើអ៊ីម៉ែល :: សុពលភាព -> អាសយដ្ឋាន ('') ពីអ៊ីម៉ែល :: ម៉ូឌុល CPAN Perl ត្រឹមត្រូវ។ សូមមើលខាងក្រោមសម្រាប់ព័ត៌មានលម្អិតការដំឡើងនិងឧទាហរណ៍។

អ៊ីម៉ែល :: សុពលភាពអ៊ីម៉ែលមានសុពលភាពឧទាហរណ៍

សន្មត់ថា $ email_address មានអាស័យដ្ឋានដែលត្រូវពិនិត្យ, អ្នកអាចពិនិត្យសុពលភាពរបស់វាដោយប្រើ:

#! / usr / bin / perl ប្រើអ៊ីម៉ែល :: មានសុពលភាព $ email_address = 'me @@ example.com'; ប្រសិនបើ (អ៊ីម៉ែល:: ត្រឹមត្រូវ -> អាសយដ្ឋាន ($ email_address)) {# អាសយដ្ឋានអ៊ីមែលត្រឹមត្រូវ} ផ្សេងៗ {# អាសយដ្ឋានអ៊ីមែលមិនត្រឹមត្រូវ}

អ្នកក៏អាចមានអ៊ីម៉ែល :: ពិនិត្យត្រឹមត្រូវសម្រាប់ដែនកម្រិតកំពូលដែលត្រឹមត្រូវ (ប្រាកដថា ".com", ".net", ".cn" ឬឈ្មោះដែនត្រឹមត្រូវផ្សេងទៀតនៅចុងបញ្ចប់នៃអាសយដ្ឋានអ៊ីម៉ែល) ។ ត្រូវប្រាកដថាម៉ូឌុល Net :: Domain :: TLD ត្រូវបានតំឡើង។

#! / usr / bin / perl ប្រើអ៊ីម៉ែល :: មានសុពលភាព $ email_address = 'me @@ example.com'; ប្រសិនបើ (អ៊ីម៉ែល:: ត្រឹមត្រូវ -> អាសយដ្ឋាន (- អាសយដ្ឋាន => $ email_address -tldcheck => 1)) {# អាសយដ្ឋានអ៊ីមែលត្រឹមត្រូវ} ផ្សេងៗ {# អាសយដ្ឋានអ៊ីមែលមិនត្រឹមត្រូវ}

ដំឡើងអ៊ីម៉ែល :: ម៉ូឌុល Perl ត្រឹមត្រូវ

ដើម្បីបំពាក់ការដំឡើង Perl របស់អ្នកដោយអ៊ីម៉ែល :: ម៉ូឌុលត្រឹមត្រូវសម្រាប់សុពលភាពភាពត្រឹមត្រូវនៃអាសយដ្ឋានអ៊ីមែល:

• បើកប្រអប់បញ្ចូលពាក្យបញ្ជា។
  • ឧទាហរណ៍នៅក្រោមម៉ាក់និងលីនុចបើកកម្មវិធីស្ថានីយ។
• វាយ sudo perl -MCPAN-e 'ដំឡើងអ៊ីមែល: ត្រឹមត្រូវ' (Mac និងលីនុច) ឬ perl -MCPAN-e 'ដំឡើងអ៊ីមែល: ត្រឹមត្រូវ' ។
• ចុច បញ្ចូល ។
  • បញ្ចូលពាក្យសម្ងាត់អ្នកប្រើជាន់ខ្ពស់ហើយចុច បញ្ចូល ប្រសិនបើមានការសួរ។
  • សួរ តើអ្នកចង់ឱ្យខ្ញុំកំណត់រចនាសម្ព័ន្ធច្រើនតាមដែលអាចធ្វើទៅបានដោយស្វ័យប្រវត្តិ? ជ្រើសរើស "បាទ / ចាស" លុះត្រាតែអ្នកដឹង
  • ត្រូវបានសួរថា តើវាត្រឹមត្រូវទេក្នុងការព្យាយាមភ្ជាប់អ៊ីនធឺណិត? បញ្ចូល "បាទ / ចាស" ផងដែរ។