PowerShell如何在特定的行前添加文本？

meixi · 发表于 2022-11-27 09:12:36

大家好:

我想在下面的
第一个@开头的行之前,
且在前面的已有文本的行之后,
添加变量$a的文本

注意:
1.变量$a的文本后面还要加上1个序号, 这个序号需要判断前面所有行中间的数字来得出
例如下面的文本:
已经有了 2, 5, 11, 还没有1, 则添加的文本后面序号为1
但是如果已经有了 1, 2, 5, 11, 还没有3, 那添加的文本后面序号为3
规律就是添加前面所有数字中没还没有的最小数字

2.数字左右的文本不是固定的, 但是,肯定会有一个1-3位的数字在一行中
含有数字的行也不是固定的, 但它总是出现在字母或文字开头的行, 即符号开头的行中间是不会有数字的

3.处理后, 第一个@开头的行之前只保留一个空行
------------------------------------------------------------------------------
hello11world
-
hello2go
>
world5to

@hello
hello

@world
world
------------------------------------------------------------------------------
处理后输出:

hello11world
-
hello2go
>
world5go
我是要加的文本1

@hello
hello

@world
world

$s = @'
hello11world
-
hello2go
>
world5to
@hello
hello
@world
world
'@
$a = "我是要加的文本"
<# 处理后输出:
hello11world
-
hello2go
>
world5go
我是要加的文本1
@hello
hello
@world
world
#>

复制代码

pd1 · 发表于 2022-11-27 15:29:58

11 5 2左右的值是固定的？
也默认在1 3 5行吗

meixi · 发表于 2022-11-27 16:42:22

本帖最后由 meixi 于 2022-11-27 18:22 编辑

回复 2# pd1

感谢!

数字左右的文本不是固定的, 但是,肯定会有一个1-3位的数字在一行中

所在的行也不是固定的, 但它总是出现在字母或文字开头的行, 即符号开头的行中间是不会有数字的

idwma · 发表于 2022-11-27 18:35:38

$a=@{}
foreach($l in ($f=gc 1.txt)){
if($l -match '\d+'){
$m=$matches[0]
if([int]$m -gt $i){[int]$i=$m}
$a[[int]$m]=1
}elseif($l -match '^@'){
1..$i|%{if(!$a[$_]){$i=$_;break}}
}
}
$f -join "`r`n" -replace '(?s)(?<=^[^@]+?)\s+(?=@)',"`r`n我是要加的文本$i`r`n`r`n"

复制代码

meixi · 发表于 2022-11-27 19:27:37

回复 4# idwma

多谢,

忘了一点逻辑, 像下面这种情况, 应该怎样改代码?
当没有要补的中间数时, 要顺着最后面的数字向后加1, 添加的文本后面的序号应该是4

hello3world
-
hello2go
>
world1to

idwma · 发表于 2022-11-27 20:25:32

回复 5# meixi

$a=@{}
foreach($l in ($f=gc 1.txt)){
if($l -match '\d+'){
$m=$matches[0]
if([int]$m -gt $i){[int]$i=$m}
$a[[int]$m]=1
}elseif($l -match '^@'){
1..$i|%{if(!$a[$_]){$i=$_;break}}
if($a.count -eq $i){$i++}
break
}
}
$f -join "`r`n" -replace '(?s)(?<=^[^@]+?)\s+(?=@)',"`r`n我是要加的文本$i`r`n`r`n"

复制代码

xczxczxcz · 发表于 2022-11-27 20:54:26

娱乐一下：

$s = @'
hello11world
-
hello2go
>
world5to
@hello
hello
@world
world
'@
$a='添加字符串';
[regex]::Replace($s, '(?s)^[^@]+', {
if([string]::IsNullOrEmpty($args.Value.Trim())){return $args.Value;}
[int[]]$num=[regex]::Matches($args.Value, '\d+').Value;
$n=1;
while($true){if($num -ne$null -and$num.Contains($n)){$n++}else{break;}}
return "{0}`r`n$a$n`r`n`r`n" -f$args.Value.TrimEnd();
})

复制代码

meixi · 发表于 2022-11-27 23:09:46

本帖最后由 meixi 于 2022-11-27 23:14 编辑

回复 7# xczxczxcz

多谢!

请教怎样只匹配一行中先出现的数字, 而后面出现的数字则忽略掉不计?
例如下面的示例文本, 我在先出现的数字左右加了些空格, 在数字后面又加了些字符和数字,
即: 只有先出现的数字才参与序号的计算!
下面的文本执行后, 序号是4 应该是2就对了

$s = @'
hello 1 a 1 cc 1
world 3 b5 bb 2

@hello
hello

@world
world
'@

xczxczxcz · 发表于 2022-11-27 23:19:34

回复 8# meixi

[regex]::Matches($args.Value,'(?m)^(?:(?!\d).)*\d+').value -replace '\D+'

复制代码

复制代码
不再回复，多看一下正则即可。

xczxczxcz · 发表于 2022-11-27 23:27:58

[regex]::Matches($args.Value,'(?m)(?<=^[^\d]*)\d+').value;

复制代码

也可以。确定左边界就行。然后减少匹配次数。

meixi · 发表于 2022-11-27 23:41:13

回复 6# idwma

刚试了一下, 发现@开头的行后面的数字会影响序号
我把第5行后面的1删了, 加的序号是对的, 不删加的序号是错的

$s = @'
hello 1 a 3 aa 1
world 2 a 6 aa 3
@hello helo1
hello
@world world2
world
'@ -split '\r?\n'
$a = "我是要加的文本"
#$f = gc 1.txt
$a = @{ }
foreach ($l in ($f = $s))
{
if ($l -match '\d+')
{
$m = $matches[0]
if ([int]$m -gt $i) { [int]$i = $m }
$a[[int]$m] = 1
}
elseif ($l -match '^@')
{
1 .. $i | %{ if (!$a[$_]) { $i = $_; break } }
if ($a.count -eq $i) { $i++ }
break
}
}
$f -join "`r`n" -replace '(?s)(?<=^[^@]+?)\s+(?=@)', "`r`n我是要加的文本$i`r`n`r`n"

复制代码

meixi · 发表于 2022-11-27 23:43:58

回复 10# xczxczxcz

多谢, 这个可以了

惭愧, 复杂的正则还看不太懂

		自动登录	找回密码
密码			注册

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

[问题求助] PowerShell如何在特定的行前添加文本？

评分

评分

浏览过的版块