[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
5i365

Rank: 5Rank: 5

帖子
1012 
积分
1226 
技术
14  
捐助
0  
注册时间
2019-2-20 
1楼 跳转到 » 倒序看帖
打印
tT
发表于 2022-10-19 15:40 | 只看该作者

[问题求助] PowerShell处理一对儿相匹配的行内的字符

本帖最后由 5i365 于 2022-10-20 07:41 编辑

xxx 表示函数名, 它的正则是 ^[a-zA-Z_][a-zA-Z0-9_]*$

先获取所有的 function xxx(

再把每个 function xxx( 去匹配 $xxx( 开头的行(该行前可能有tab或空格)

如果能匹配到: 则先将该行开头的 $ 还有后面的 , 和 ) 替换为空(即:删掉它们), 再将 ( 替换为一个空格

例如 function A( 能匹配到 $A( 开头的行, 则将该行由原来的 $A($p1, $p2) 改为 A $p1 $p2

___________________________________________处理前:

$A($p1, $p2)
$BB($p1)
$CCC()

function A($p1, $p2)
function BB($p1)
function CCC()

___________________________________________处理后:

A $p1 $p2
BB $p1
CCC

function A($p1, $p2)
function BB($p1)
function CCC()

___________________________________________代码:
  1. $s = @'

  2.  $A($p1, $p2)

  3.         $BB($p1)

  4. $CCC()

  5. 

  6. function A($p1, $p2)

  7. function BB($p1)

  8. function CCC()

  9. '@

  10. 

  11. # 表示 xxx 的正则是 ^[a-zA-Z_][a-zA-Z0-9_]*$

  12. # 先获取所有的 function xxx(

  13. # 再把每个 function xxx( 去匹配 $xxx( 开头的行(该行前可能有tab或空格,要保留)

  14. # 如果能匹配到: 则先将该行开头的 $ 还有后面的 , 和 ) 替换为空(即:删掉它们), 再将 ( 替换为一个空格

  15. # 例如 function A( 能匹配到 $A( 则将该行按上面规则改为 A $p1 $p2

  16. # 最终输出效果如下:

  17. <#

  18.  A $p1 $p2

  19.         BB $p1

  20. CCC

  21. 

  22. function A($p1, $p2)

  23. function BB($p1)

  24. function CCC()

  25. #>
复制代码
收藏 分享
本人所发所有贴子或代码, 诸大侠若认为有改进之处,请不吝赐教,感激不尽!

5i365

Rank: 5Rank: 5

帖子
1012 
积分
1226 
技术
14  
捐助
0  
注册时间
2019-2-20 
2楼
发表于 2022-10-23 12:27 | 只看该作者
本帖最后由 5i365 于 2022-10-23 13:04 编辑

搞的差不多了,  但是结果重叠了
  1. $s = @'

  2.  $A($p1, $p2)

  3.         $BB($p1)

  4. $CCC()

  5. 

  6. function A($p1, $p2)

  7. function BB($p1)

  8. function CCC()

  9. '@

  10. 

  11. $a = @()

  12. $s -split '\r?\n' |

  13. foreach {

  14.         if ($_ -match 'function ([a-zA-Z_][a-zA-Z0-9_]*\(.*\))')

  15.         {

  16.                 $a += $matches[1]

  17.         }

  18. }

  19. 

  20. $a |

  21. foreach{

  22.         $r = '${0}' -f $_

  23.         $n = $r -replace '\(', ' ' -replace '\)' -replace ',' -replace '^\$'

  24.         

  25.         $s.Replace($r, $n)

  26. }
复制代码
本人所发所有贴子或代码, 诸大侠若认为有改进之处,请不吝赐教,感激不尽!

TOP

5i365

Rank: 5Rank: 5

帖子
1012 
积分
1226 
技术
14  
捐助
0  
注册时间
2019-2-20 
3楼
发表于 2022-10-23 13:10 | 只看该作者
搞定
  1. $s = @'

  2.  $A($p1, $p2)

  3. 	$BB($p1)

  4. $CCC()

  5. 

  6. function A($p1, $p2)

  7. function BB($p1)

  8. function CCC()

  9. '@

  10. 

  11.  @()

  12. $s -split '\r?\n' |

  13. foreach {

  14. 	if ($_ -match 'function ([a-zA-Z_][a-zA-Z0-9_]*\(.*\))')

  15. 	{

  16. 		$matches[1]

  17. 	}

  18. } |

  19. foreach{

  20. 	$r = '${0}' -f $_

  21. 	$n = $r -replace '\(', ' ' -replace '\)' -replace ',' -replace '^\$'

  22. 	$s = $s.Replace($r, $n)

  23. }

  24. 

  25. $s
复制代码
本人所发所有贴子或代码, 诸大侠若认为有改进之处,请不吝赐教,感激不尽!

TOP

返回列表