php 檢查email電子郵件函數

 　　以前寫的一個PHP表單電子郵件發送程式，其中採用如下方法來驗證電子郵件地址格式是否正確：

代碼如下
eregi("^[_a-z0-9-]+(.[_a-z0-9-]+)*@[a-z0-9_-]+.[a-z0-9_-]+.*", $email)

　　後來發現類似於將.誤寫為,的電子郵件地址也能通過驗證，例如user@126,com。經過檢查，發現它實際上只驗證了使用者名稱部分，所以又在網上找到一個教程，其中給出的例子如下：

代碼如下
eregi('^[_a-z0-9-]+(.[_a-z0-9-]+)*@[a-z0-9-]+(.[a-z0-9-]+)*$',$email)

　　經過檢查，發現電子郵件地址user@126,com仍然能夠通過它的驗證。找到了一個樣本：

代碼如下
eregi("^[_.0-9a-z-]+@([0-9a-z][0-9a-z-]+.)+[a-z]{2,3}$",$str)

　　這個看起來更加合理一些，因為它對尾碼名稱進行了驗證，儘管現在出現了4個字元以上的頂級網域名稱，但是只需要稍加修改即可。不過電子郵件地址user@xxx,com 111cn.net仍然能夠通過驗證，仔細檢查後發現是因為沒有對.進行轉義導致。於是對它稍做修改：

代碼如下
eregi("^[_.0-9a-z-]+@([0-9a-z][0-9a-z-]+.)+[a-z]{2,4}$)

　　雖然它對使用者名稱的檢查要更加寬鬆一些，但是現在使用它的效果似乎不錯。

　　例1

代碼如下
<?php function is_valid_email($email, $test_mx = false) { if(eregi("^([_a-z0-9-]+)(.[_a-z0-9-]+)*@([a-z0-9-]+)(.[a-z0-9-]+)*(.[a-z]{2,4})$", $email)) if($test_mx) { list($username, $domain) = split("@", $email); return getmxrr($domain, $mxrecords); } else return true; else return false; } ?>

　　例2(自己寫的)

代碼如下

function is_valid_email_address($email){  $qtext = '[^//x0d//x22//x5c//x80-//xff]';  $dtext = '[^//x0d//x5b-//x5d//x80-//xff]';  $atom = '[^//x00-//x20//x22//x28//x29//x2c//x2e//x3a-//x3c'.  '//x3e//x40//x5b-//x5d//x7f-//xff]+';  $quoted_pair = '//x5c[//x00-//x7f]';  $domain_literal = "//x5b($dtext|$quoted_pair)*//x5d";  $quoted_string = "//x22($qtext|$quoted_pair)*//x22";  $domain_ref = $atom;  $sub_domain = "($domain_ref|$domain_literal)";  $word = "($atom|$quoted_string)";  $domain = "$sub_domain(//x2e$sub_domain)*";  $local_part = "$word(//x2e$word)*";  $addr_spec = "$local_part//x40$domain";  return preg_match("!^$addr_spec$!", $email) ? 1 : 0;  }