正则表达式 二

/i                         不区分大小写

/g                        全局替换

(?:        )         非捕获性括号

(?=      )          顺序环视

(?<=    )         逆序环视

用正则 保留小数点后两为数，如果第三位不为零，这也需要保留：

perl语言中：

        $price =~ s/(\.\d\d[1-9]?)\d*/$1