小白龙 当前离线
少尉
$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()复制代码
newswan 当前离线
上尉
TOP
wanghan519 当前离线
二级士官
echo 'win s(dows s(" s(abc) ") )); s()' | perl -lane 'while(/s(?=(\((?:[^()]+|(?1))*\)))/g){print $&,$1}'复制代码
idwma 当前离线
少校
$s = 'win s(dows s(" s(abc) ") )); s()' $p = "(?=(s\((?:[^()]+|(?<Open>)\(|(?<-Open>)\))*(?(Open)(?!))\)))" [Regex]::Matches($s, $p) | ForEach-Object { $_.groups[1].value }复制代码
评分人数
对比之后，差异在于，前后多了 (?=( ))复制代码
WHY 当前离线
上校
$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复制代码
发表于 2024-1-19 12:29
| 
