不知行否- $s = @'
- ●● 中国 ★ 美国 ★ 日本 ★ 德国
- ★ 法国
- ★ 韩国
- 你好
- 世界
- hello
- world
- '@
-
- $m=[regex]::match($s,'(?m)^●●[^★]+(?=★)')
- if($m.Success){
- $s1=$m.value.Substring(2).trim()
-
- #跨行
- $r=[regex]::new('([\r\n\s]?★[^★\r\n]+)+',[Text.RegularExpressions.RegexOptions]16)
- $s2=$r.Match($s,$m.Index+$m.Length).value.replace("`r`n",'').split('★').where{$_}.trim()
-
- #不跨行
- #$r=[regex]::new('..*',[Text.RegularExpressions.RegexOptions]2)
- #$s2=$r.Match($s,$m.Index+$m.Length).value.split('★').where{$_}.trim()
-
- $s1
- '------'
- $s2
- }
复制代码
|