[文本处理] [求助]批处理排列很规则的文本，按条件去除部分内容

<#*,:&cls
@echo off
pushd "%~dp0"
powershell -NoProfile -ExecutionPolicy RemoteSigned -Command ". ([ScriptBlock]::Create((Get-Content -LiteralPath \"%~0\" -ReadCount 0 | Out-String ))) "
popd
pause
exit /b
#>
$srcfile = "tt.txt"
$dstfile = "ttNEW.txt"
$stack = 0
Get-Content -Path $srcfile -OutBuffer 100 | ForEach-Object {
  $line = $_
  switch ($stack) {
    0 { 
      if ($line -ne '') {
        if ($line -match '^[\w, ]+$' -and $line -notmatch '_') {
          $stack = 2
          $line.Replace(',', '')
        } else {
          $stack = 1
        }
      } else {
        $line 
      }
    }
    1 {
      if ($line -eq '') {
        $stack = 0
        $line
      } elseif ($line -match '^[\w, ]+$' -and $line -notmatch '_') {
        $stack = 2
        $line.Replace(',', '')
      }
    }
    2 {
      if ($line -eq '') {
        $stack = 0
        $line
      }
    }
  }
} | Set-Content -Path $dstfile
复制代码

PowerShell "$a=@(gc tt.txt) -notMatch '[\p{P}-[,]]' | forEach{if($_ -ne '' -and [string]::isNullOrEmpty($s)){$_}; $s=$_}; sc bb.txt ($a -replace ',' -join \"`r`n`r`n`r`n\")"
复制代码