[问题求助] 求助PowerShell平衡组取所有匹配项

小白龙

下面代码用 [Regex]::Matches($s, $p) | ForEach-Object { $_.Value } 只能输出两组, 我想输出四组, 应该怎样修改?

$s = 'win s(dows s(" s(abc) ") )); s()'
$p = "s\(((?:(?>[^()]*)|\((?<Open>)|\)(?<-Open>))*(?(Open)(?!)))\)"

[Regex]::Matches($s, $p)

#修改powershell代码,我想输出所有满足s()的文本, 一共4组
#s(abc)
#s(" s(abc) ")
#ss(dows s(" s(abc) ") )
#s()
复制代码

WHY

不管是 .net 还是 perl，平衡组里面的固化分组都不要省略（除非你是神，能够百分百确定会匹配成功）
不仅仅是为了提高效率，更是为了避免过度回溯。

也可以用递归

$s = 'win s(dows s(" s(abc) ") )); s()'
$p = 's\((?:(?>[^()]*)|\((?<Open>)|\)(?<-Open>))*(?(Open)(?!))\)'

function fun($str) {
    [regex]::Matches($str, $p) | forEach {
        fun $_.Value.SubString(2);
        $_.Value;
    }
}
fun $s
复制代码

idwma

回复 8# newswan


    openai

newswan

回复 6# idwma

哪个ai，推荐下

newswan

对比之后，差异在于，前后多了 (?=(   ))
复制代码

idwma

回复 5# newswan


    呃不知道，把3楼的例子丢给ai得到的结果

newswan

回复 4# idwma


    为什么一个 foreach 就行了？什么原理

idwma

$s = 'win s(dows s(" s(abc) ") )); s()'
$p = "(?=(s\((?:[^()]+|(?<Open>)\(|(?<-Open>)\))*(?(Open)(?!))\)))"

[Regex]::Matches($s, $p) | ForEach-Object { $_.groups[1].value }
复制代码

wanghan519

用perl试了半天，好像需要零宽断言，保证各级都搜索到，powershell还没试出来

echo 'win s(dows s(" s(abc) ") )); s()' | perl -lane 'while(/s(?=(\((?:[^()]+|(?1))*\)))/g){print $&,$1}'
复制代码

newswan

内部的匹配项，再一次匹配