搜索email帳號這篇中有提到只用@來判斷email是否正確是不夠精確的,
在email address的組成中,
@以前的稱為local-part,指得是使用者的名稱(username),
@以後的稱為domain-part,通常是由主稱名稱(host name)或網域名稱(domain name)構成,
這裡要介紹的是Email::Valid模組,
可用來判所email address是否格式正確。

use Email::Valid;

while(<DATA>){
chomp;
my $email=$_;
  unless(Email::Valid->address($email)){
   print '這個帳號格式有問題 ', $email, "\n";
  }
}
__DATA__
jck11@ms94.url.com.tw
jck11.@ms94.url.com.tw
jck11@ms94,url.com.tw
jck11@ms94

jck11 發表在 痞客邦 PIXNET 留言(2) 人氣()


留言列表 (2)

發表留言
  • 張大餅
  • 我比較想要判斷是不是病毒
  • 這個要防毒軟體才有這種能力^^

    jck11 於 2007/11/13 16:22 回覆

  • ming0529
  • 難懂~"~