考虑以下包含混淆的电子邮件地址的脚本,以及一个尝试*****
使用正则表达式模式匹配替换它们的函数。我的脚本试图捕捉这些词:"at", "a t", "a.t", "@"
后跟一些文本(任何域名),然后是"dot" "." "d.o.t"
,然后是 TLD。
输入:
$str[] = 'dsfatasdfasdf asd dsfasdf dsfdsf@hotmail.com';
$str[] = 'I live at school where My address is dsfdsf@hotmail.com';
$str[] = 'I live at school. My address is dsfdsf@hotmail.com';
$str[] = 'at school my address is dsfdsf@hotmail.com';
$str[] = 'dsf a t asdfasdf asd dsfasdf dsfdsf@hotmail.com';
$str[] = 'd s f d s f a t h o t m a i l . c o m';
function clean_text($text){
$pattern = '/(\ba[ \.\-_]*t\b|@)[ \.\-_]*(.+)[ \.\-_]*(d[ \.\-_]*o[ \.\-_]*t|\.)[ \.\-_]*(c[ \.\-_]*o[ \.\-_]*m|n[ \.\-_]*e[ \.\-_]*t|o[ \.\-_]*r[ \.\-_]*g|([a-z][ \.\-_]*){2,3}[a-z]?)/iU';
return preg_replace($pattern, '***', $text);
}
foreach($str as $email){
echo clean_text($email);
}
预期输出:
dsfatasdfasdf asd dsfasdf dsfdsf***
I live at school where My address is dsfdsf@***
I live at school. My address is dsfdsf@***
***
dsf ***
d s f d s f ***
结果:
dsfatasdfasdf asd dsfasdf dsfdsf***
I live ***
I live ***
at school my address is dsfdsf****
dsf ***
d s f d s f ***
问题: 它捕获了“at”的第一次出现,而不是最后一次出现,所以会发生以下情况:
input: 'at school my address is dsfdsf@hotmail.com'
produces: '****'
should produce: 'at school my address is dsfdsf****'
我怎样才能解决这个问题?