php 检查电子邮件函数(自写)

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;
}