回复 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"
复制代码
|