全球邮箱正则表达式

最近做外贸，涉及到邮箱的匹配，网上查了一下，没有合适的，因为设计到各种语言，各种格式的邮箱，就尝试自己写了，效果还可以。

$partten = '/[^`~!@#$%\^&\*\(\)\+=\|\{\}\':;\',\\\[\]<>\/\?~！@#￥%……&\*（）——+\|\{\}【】‘；：”“’。，、？\s]{1,}@[^`~!@#$%\^&\*\(\)\+=\|\{\}\':;\',\\\[\]\.<>\/\?~！@#￥%……&\*（）——+\|\{\}【】‘；：”“’。，、？\s]{1,}\.[^`~!@#$%\^&\*\(\)\+=\|\{\}\':;\',\\\[\]<>\/\?~！@#￥%……&\*（）——+\|\{\}【】‘；：”“’。，、？\s]{1,}/i';
        $match_res = preg_match($partten, $str, $match);
        if($match_res == 1) {
            echo $match[0];
        }