Како проверити е-адресе са Перл-ом

Да ли је исправно и да ли ће то функционисати? Ако сакупљате или користите адресе е-поште било гдје у вашим Перл скриптама и програмима, можда ћете сакупити многе адресе које не раде. Можда недостаје слово у имену домена , а други може имати превише ограничен карактер.

Без обзира на разлоге за његову неважећу, желите да ухватите сломљену адресу - да бисте упитали корисника да поново уђе или можда избегава слање е-поште која сигурно неће ићи.

У Перлу можете, наравно, да саставите компликовани регуларни израз; или се окренете ка практичном модулу који већ има један уграђени и може проверити имена домена.

Потврдите е-адресе са Перл

Да бисте проверили адресе е-поште за добро формирану и валидност у Перл скрипти или програму:

• Изградите валидацију е-поште у ХТМЛ код ако имате корисницима уписати адресе е-поште у веб облик.
• Користите Емаил :: Валид-> адресу ('') из е-поште :: Валид ЦПАН Перл модул; погледајте доле за детаље, инсталацију и примере.

Е-маил :: Валидни примјери валидације е-поште

Под претпоставком да $ емаил_аддресс има адресу коју треба проверити, можете проверити његову валидност помоћу:

#! / уср / бин / перл користите Емаил :: Валид $ емаил_аддресс = 'ме @@ екампле.цом'; ако (Емаил :: Валид-> адреса ($ емаил_аддресс)) {# Е-адреса је важећа {елсе {# Е-адреса није важећа}

Такође можете имати Емаил :: Валидну провјеру важећих домена највишег нивоа (осигурати да су .цом, .нет, .цн или друго важеће име домена на самом крају е-поште). Уверите се да је Нет :: Домаин :: ТЛД модул инсталиран.

#! / уср / бин / перл користите Емаил :: Валид $ емаил_аддресс = 'ме @@ екампле.цом'; ако (Емаил :: Валид-> адреса (-аддресс => $ емаил_аддресс, -тлдцхецк => 1)) {# Е-адреса је важећа {елсе {# Е-адреса није важећа}

Инсталирајте Модул Емаил Валид Перл

Да бисте опремили Перл инсталацију помоћу модула Емаил :: Валид за валидацију исправности е-поште:

• Отворите командну линију.
  • Под Мац и Линук отворите апликацију Терминал, на пример.
• Укуцајте судо перл -МЦПАН -е 'инсталирати Емаил :: Валид' (Мац и Линук) или перл -МЦПАН -е 'инсталирати Емаил :: Валид'.
• Притисните Ентер .
  • Унесите супер корисничку лозинку и притисните Ентер ако то буде затражено.
  • Упитани Желите ли да сам аутоматски конфигуришем колико год је то могуће? , изаберите "да", осим ако не знате
  • Упитан Да ли је у реду покушати да се повежете на Интернет? , унесите и "да".