【求助】正则查找替换问题【已解决】
本帖最后由 网络书生 于 2018-3-11 14:40 编辑比如说我有个文本文件a.txt
内容为:
adjfahdjf,15468787,125745666,1234,666
我现在要正则查找大于等于8位的数字,怎么返回值为15468787、和125745666的数?
下一步我要替换内容将15468787、和125745666替换为原来数字的前8位,语句改怎么写? #include <Array.au3>
Local $sSource = 'adjfahdjf,15468787,125745666,1234,666'
;~MsgBox(0, '源字符串', $sSource)
Local $aSRE = StringRegExp($sSource, '\d{8,}', 3)
If Not @Error Then MsgBox(0, '匹配数量: ' & UBound($aSRE), '其中元素为: ' & $aSRE)
_ArrayDisplay($aSRE, UBound($aSRE))
Local $sSRERe = StringRegExpReplace($sSource, '(\d{8})\d+', '${1}')
MsgBox(0, '替换结果', $sSRERe)
回复 2# afan
非常感谢版主,问题已解决!
页:
[1]