[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
不知行否
  1. $s = @'
  2. ●● 中国 ★ 美国 ★ 日本 ★ 德国
  3. ★ 法国
  4. ★ 韩国
  5. 你好
  6. 世界
  7. hello
  8. world
  9. '@
  10. $m=[regex]::match($s,'(?m)^●●[^★]+(?=★)')
  11. if($m.Success){
  12. $s1=$m.value.Substring(2).trim()
  13. #跨行
  14. $r=[regex]::new('([\r\n\s]?★[^★\r\n]+)+',[Text.RegularExpressions.RegexOptions]16)
  15. $s2=$r.Match($s,$m.Index+$m.Length).value.replace("`r`n",'').split('★').where{$_}.trim()
  16. #不跨行
  17. #$r=[regex]::new('..*',[Text.RegularExpressions.RegexOptions]2)
  18. #$s2=$r.Match($s,$m.Index+$m.Length).value.split('★').where{$_}.trim()
  19. $s1
  20. '------'
  21. $s2
  22. }
复制代码
1

评分人数

TOP

返回列表