የኢሜይል አድራሻዎችን ከፐርል ጋር እንዴት ማረጋገጥ እንደሚቻል

ልክ ነው, እና ይሠራል? በርስዎ የፐርል ስክሪፕት እና ፕሮግራሞች ውስጥ የኢሜይል አድራሻዎችን የሚሰበሰቡ ወይም የሚጠቀሙ ከሆነ, የማይሰሩ ብዙ አድራሻዎችን ሊሰበስቡ ይችላሉ. አንዱ በጎራ ስም ውስጥ ሊኖር ይችላል, ሌላው ደግሞ ያልተፈቀደ ገጸ-ባህሪያት ሊኖረው ይችላል.

የጎደለው ምክንያት ምክንያቱ ምንም ይሁን ምን የተሰበሰውን አድራሻ እንዲይዝዎ ነው - ተጠቃሚው ተመልሶ እንዲገባ ለማድረግ ወይም ከየትኛውም ቦታ ለመሄድ እርግጠኛ ያልሆነ ኢሜይል እንዳይላክ ለማድረግ ይፈልጋሉ.

በፐርል, ውስብስብ የቋንቋ አገላለፅን ማዋቀር ይችላሉ, ወይም ቀድሞውኑ አንድ አብሮገነብ ወደተሠራ ውሱን ሞዴል እና የዶሜን ስሞችን መፈተሽ ይችላሉ.

የኢሜይል አድራሻዎችን በ Perl ያረጋግጡ

በአንድ የፐርል ስክሪፕት ወይም ፕሮግራም ውስጥ የኢሜይል አድራሻዎችን ለመፈተሽ እና ለማረጋገጥ.

ኢሜይል :: ትክክለኛ የኢሜይል አድራሻ ማረጋገጥ ምሳሌዎች

$ Email_address የሚረጋገጥበት አድራሻ እንዲቆይ ያደርገዋል, የሚከተለውን በመጠቀም ማረጋገጥ ይችላሉ:

#! / usr / bin / perl ይጠቀሙ ኢሜይል: ልክ የሆነ አድራሻ ($ email_address)) {# ይህ ኢሜይል ትክክለኛ ነው} ሌላ {# የኢ-ሜይል አድራሻው ትክክለኛ አይደለም}

እንዲሁም ትክክለኛ ለሆኑ ከፍተኛ ደረጃ ጎራዎች (".com", ".net", ".cn" ወይም ሌላ ትክክለኛ የጎራ ስም "ኢሜል አድራሻ" የሚለውን) ማረጋገጥ ይችላሉ. Net :: Domain :: TLD ሞጁል እንደተጫነ እርግጠኛ ይሁኑ.

#! / usr / bin / perl ይጠቀሙ ኢሜይል: ልክ የሆነ አድራሻ (-address => $ email_address, -tchecheck => 1)) {# ይህ ኢሜይል ትክክለኛ ነው} ሌላ {# የኢ-ሜይል አድራሻ ትክክለኛ አይደለም}

ኢሜል: ትክክለኛ የ Perl ሞዱል ይጫኑ

የኢኤልኤልን መጫኛ በኢሜይል :: የተገበረው ሞዴል የኢሜል አድራሻ ትክክል መሆኑን ለማጣራት.

  • የትዕዛዝ ጥያቄን ይክፈቱ.
    • በማክ እና ሊነክስ መካከል, ለምሳሌ የ Terminal መተግበሪያን ይክፈቱ.
  • Sudo perl ብለው ይተይቡ -MCPAN- ኢ 'ኢሜል ቫን .: Valid' (ማክስ እና ሊኑክስ) ወይም perl -MCPAN - 'ኢሜል ኢ-ኢ-ሜይል መጫኛ'
  • አስገባን ይጫኑ .
    • የከፍተኛ ተጠቃሚ ይለፍ ቃል ያስገቡ እና ከተጠየም Enter የሚለውን ይጫኑ .
    • ይጠየቁ በተቻለ መጠን በራስ-ሰር በተናጠል ለማዋቀር ይፈልጋሉ? , እስካልነቁት ድረስ "አዎ" ን ይምረጡ
    • ሲጠየቁ ከበይነመረቡ ጋር ለመገናኘት መሞከር ትክክለኛ ነውን? , "አዎ" ን ያስገቡ.