[文本处理] 批处理怎样对xml文件里的指定字符串替换成指定序号？

@echo off
setlocal enabledelayedexpansion
chcp 65001
set file=
set /p file=请拖入要操作的文件名称(包括扩展名)：
set "file=%file:"=%"
for %%i in ("%file%") do set file=%%~fi
echo.
set replaced=
set /p replaced=请输入即将被替换的内容：
echo.
set all=
set /p all=请输入替换字符串：
(for /f "delims=" %%i in ('type "%file%"') do (
    set "str=%%i"
    if "!str:%replaced%=!" NEQ "!str!" (
        set /a n+=1
        for %%j in (!n!) do (
            set "str=!str:%replaced%=%all%_%%j!"
        )
    )
    echo;!str!
))>"%file%"_tmp.xml
复制代码

$file = Read-Host('拖入要操作的文件');
$srcStr = Read-Host('输入即将被替换的内容');
$dstStr = Read-Host('输入替换后的字符串');

$file = $file.Replace('"', '');
$arr = (gc -Literal $file -Enc UTF8 -ReadCount 0) -join "`r`n" -split [regex]::Escape($srcStr);
$count = $arr.Count - 1;
for($i=0; $i -lt $count; $i++){
    $arr[$i] += $dstStr + ($i + 1);
}
sc -Literal ($file + '_tmp.xml') -Enc UTF8 -Value ($arr -join '');

echo 'Done';
[console]::ReadKey();
复制代码