[文本处理] [已解决]批处理如何将一个文本的特定行依次替换成另一个文本的每一行并分别输出到文本

sumirecccp

批处理如何将一个文本文档的某一特定行逐次替换成另一个文本并分别输出文件
主要诉求如下：
有一个test1.avs，内容为：

samplecontentA
samplecontentB
#trim#
samplecontentC
samplecontentD
复制代码

另有一个trim.txt，内容为：

091trim(32,18054)
092trim(18243,36271)
093trim(36458,54472)
……
复制代码

想要分别输出以下效果的文档：

samplecontentA
samplecontentB
091trim(32,18054)
samplecontentC
samplecontentD
复制代码

保存为prefix_091.avs

samplecontentA
samplecontentB
092trim(18243,36271)
samplecontentC
samplecontentD
复制代码

保存为prefix_092.avs

求具体的实现代码，谢谢了。

DiamondbacK

@echo off
setlocal enableDelayedExpansion

for /f "delims=" %%L in (trim.txt) do (
  set line=%%L
  set prefix=!line:~0,3!
  sed "/^#trim#$/s//%%L/" test1.avs > prefix_!prefix!.avs
)

endlocal
exit /b
复制代码

DiamondbacK

@echo off
setlocal enableDelayedExpansion

set avsFile=test1.avs
set trimFile=trim.txt

for /f "delims=" %%L in (%trimFile%) do (
  set line=%%L
  set prefix=!line:~0,3!
  type nul > prefix_!prefix!.avs
  for /f "delims=" %%I in (%avsFile%) do (
    if "%%I" == "#trim#" (
      echo %%L
    ) else (
      echo %%I
    )
  ) >> prefix_!prefix!.avs 
)

endlocal
exit /b
复制代码

wskwfkbdn

回复 3# DiamondbacK


    强大

wskwfkbdn

@echo OFF & setlocal enableDelayedExpansion

for /f "delims=" %%L in (trim.txt) do (
    set line=%%L
    set prefix=!line:~0,3!
    REM repdos专注文本匹配与处理(第三方命令行)
    repdos -d:"test1.avs" -fic:"#trim#" -t:"%%L" >prefix_!prefix!.avs
)

pause
复制代码

虽然第三方比较简单，但是还是赞2楼的纯P写的效果很棒，不过我也发一个占占沙发

sumirecccp

回复 3# DiamondbacK


    谢谢，十分有效果，我也比较喜欢这种不借助第三方工具的纯批处理方式（虽然不知道两者比较起来效率如何。。。。）

sumirecccp

顺便附上另一个朋友写的PYTHON代码：

#!/usr/bin/env python

import sys
import re

def readtrimfile(trimfile):
    f = open(trimfile, 'r')
    trimitems = f.readlines()
    f.close()
    return map(lambda x:x.strip(), trimitems)

def readtemplate(avsfile):
    f = open(avsfile, 'r')
    content = f.read()
    f.close()
    return content

def patchitem(template, trimitem):
    idx_trim = template.index('#trim')
    leftpart = template[:idx_trim]
    rightpart = template[idx_trim + 5:]
    result = leftpart + trimitem + rightpart
    prefix_filename = 'prefix_' + trimitem[0:3] + '.avs'
    f = open(prefix_filename, 'w')
    f.write(result)
    f.close()

def main(avsfile, trimfile):
    template = readtemplate(avsfile)
    trimitems = readtrimfile(trimfile)
    for trimitem in trimitems:
        patchitem(template, trimitem)

if __name__ == '__main__':
    if len(sys.argv) != 3:
        print 'usage: ' + sys.argv[0] + ' <avs> <trim>'
        exit(1)
    main(sys.argv[1], sys.argv[2])
复制代码

DiamondbacK

JScript:

var ForReading = 1, ForWriting = 2, ForAppending = 8
var fso = new ActiveXObject('Scripting.FileSystemObject')

var avsFile = fso.OpenTextFile('test1.avs', ForReading)
var trimFile = fso.OpenTextFile('trim.txt', ForReading)
var outputAvsFile

var avsText = avsFile.ReadAll()
avsFile.close()
var trimLine, prefix, outputText

while (!trimFile.AtEndOfStream) {
    trimLine = trimFile.ReadLine()
    prefix = /^\d+/.exec(trimLine)
    outputText = avsText.split(/^#trim#$/m).join(trimLine)

    outputAvsFile = fso.OpenTextFile(
        'prefix_' + prefix + '.avs', ForWriting, true
    )
    outputAvsFile.Write(outputText)
    outputAvsFile.close()
}
trimFile.close()
复制代码

sumirecccp

回复 8# DiamondbacK


    厉害啊，看来以后要多找点课题方便你练手了

pcl_test

powershell -c "$avstext=(gc 'test1.avs');gc 'trim.txt'|%%{$n='prefix_'+($_ -replace '^\s*(\d+).+','$1')+'.avs';$avstext -replace '^\s*#trim#\s*$',$_|Out-File $n}"
pause
复制代码

#*第三方http://www.bathome.net/s/tool/index.html?key=gawk
#*&cls&gawk -f "%~f0" "trim.txt"&pause&exit
BEGIN{
    while(getline<"test1.avs">0){i++;avstext[i]=$0;if($0~/^[[:space:]]*?#trim#[[:space:]]*?$/&&!f)f=i}
}
{
    match($0,/^[[:space:]]*?([0-9]+)/,n);
    for(i=1;i<=length(avstext);i++)print (f!=i?avstext[i]:$0)>"prefix_"n[1]".avs"
}
复制代码

//&cls&cscript -nologo -e:jscript "%~f0"<"test1.avs" "trim.txt"&pause&exit

var fso = new ActiveXObject('Scripting.Filesystemobject');
var avstext = WSH.StdIn.ReadAll();
fso.OpenTextFile(WScript.Arguments(0), 1).ReadAll().replace(/[^\r\n]+/g, function(a){
    fso.CreateTextFile('prefix_' + a.match(/^\s*?(\d+)/)[1] + '.avs', 2).Write(
        avstext.replace(/^\s*?#trim#\s*?$/m, a)
    );
});
复制代码

sumirecccp

回复 10# pcl_test


    powershell更简洁，只用一句话