Board logo

标题: [文本处理] [已解决]批处理如何将一个文本的特定行依次替换成另一个文本的每一行并分别输出到文本 [打印本页]
作者: sumirecccp    时间: 2016-9-16 16:50     标题: [已解决]批处理如何将一个文本的特定行依次替换成另一个文本的每一行并分别输出到文本

本帖最后由 pcl_test 于 2016-9-17 19:42 编辑

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

  2. samplecontentB

  3. #trim#

  4. samplecontentC

  5. samplecontentD
复制代码
另有一个trim.txt，内容为：
  1. 091trim(32,18054)

  2. 092trim(18243,36271)

  3. 093trim(36458,54472)

  4. ……
复制代码
想要分别输出以下效果的文档：
  1. samplecontentA

  2. samplecontentB

  3. 091trim(32,18054)

  4. samplecontentC

  5. samplecontentD
复制代码
保存为prefix_091.avs
  1. samplecontentA

  2. samplecontentB

  3. 092trim(18243,36271)

  4. samplecontentC

  5. samplecontentD
复制代码
保存为prefix_092.avs

求具体的实现代码，谢谢了。
作者: DiamondbacK    时间: 2016-9-16 23:47     标题: 第三方工具：sed

  1. @echo off

  2. setlocal enableDelayedExpansion

  3. 

  4. for /f "delims=" %%L in (trim.txt) do (

  5.   set line=%%L

  6.   set prefix=!line:~0,3!

  7.   sed "/^#trim#$/s//%%L/" test1.avs > prefix_!prefix!.avs

  8. )

  9. 

  10. endlocal

  11. exit /b
复制代码
作者: DiamondbacK    时间: 2016-9-17 00:02

  1. @echo off

  2. setlocal enableDelayedExpansion

  3. 

  4. set avsFile=test1.avs

  5. set trimFile=trim.txt

  6. 

  7. for /f "delims=" %%L in (%trimFile%) do (

  8.   set line=%%L

  9.   set prefix=!line:~0,3!

  10.   type nul > prefix_!prefix!.avs

  11.   for /f "delims=" %%I in (%avsFile%) do (

  12.     if "%%I" == "#trim#" (

  13.       echo %%L

  14.     ) else (

  15.       echo %%I

  16.     )

  17.   ) >> prefix_!prefix!.avs 

  18. )

  19. 

  20. endlocal

  21. exit /b
复制代码
作者: wskwfkbdn    时间: 2016-9-17 07:05

回复 3# DiamondbacK


    强大
作者: wskwfkbdn    时间: 2016-9-17 07:13

  1. @echo OFF & setlocal enableDelayedExpansion

  2. 

  3. for /f "delims=" %%L in (trim.txt) do (

  4.     set line=%%L

  5.     set prefix=!line:~0,3!

  6.     REM repdos专注文本匹配与处理(第三方命令行)

  7.     repdos -d:"test1.avs" -fic:"#trim#" -t:"%%L" >prefix_!prefix!.avs

  8. )

  9. 

  10. pause
复制代码
虽然第三方比较简单，但是还是赞2楼的纯P写的效果很棒，不过我也发一个占占沙发
作者: sumirecccp    时间: 2016-9-17 13:13

本帖最后由 sumirecccp 于 2016-9-17 13:15 编辑

回复 3# DiamondbacK


    谢谢，十分有效果，我也比较喜欢这种不借助第三方工具的纯批处理方式（虽然不知道两者比较起来效率如何。。。。）
作者: sumirecccp    时间: 2016-9-17 13:14

顺便附上另一个朋友写的PYTHON代码：
  1. #!/usr/bin/env python

  2. 

  3. import sys

  4. import re

  5. 

  6. def readtrimfile(trimfile):

  7.     f = open(trimfile, 'r')

  8.     trimitems = f.readlines()

  9.     f.close()

  10.     return map(lambda x:x.strip(), trimitems)

  11. 

  12. def readtemplate(avsfile):

  13.     f = open(avsfile, 'r')

  14.     content = f.read()

  15.     f.close()

  16.     return content

  17. 

  18. def patchitem(template, trimitem):

  19.     idx_trim = template.index('#trim')

  20.     leftpart = template[:idx_trim]

  21.     rightpart = template[idx_trim + 5:]

  22.     result = leftpart + trimitem + rightpart

  23.     prefix_filename = 'prefix_' + trimitem[0:3] + '.avs'

  24.     f = open(prefix_filename, 'w')

  25.     f.write(result)

  26.     f.close()

  27. 

  28. def main(avsfile, trimfile):

  29.     template = readtemplate(avsfile)

  30.     trimitems = readtrimfile(trimfile)

  31.     for trimitem in trimitems:

  32.         patchitem(template, trimitem)

  33. 

  34. if __name__ == '__main__':

  35.     if len(sys.argv) != 3:

  36.         print 'usage: ' + sys.argv[0] + ' <avs> <trim>'

  37.         exit(1)

  38.     main(sys.argv[1], sys.argv[2])
复制代码
作者: DiamondbacK    时间: 2016-9-17 18:24

JScript:
  1. var ForReading = 1, ForWriting = 2, ForAppending = 8

  2. var fso = new ActiveXObject('Scripting.FileSystemObject')

  3. 

  4. var avsFile = fso.OpenTextFile('test1.avs', ForReading)

  5. var trimFile = fso.OpenTextFile('trim.txt', ForReading)

  6. var outputAvsFile

  7. 

  8. var avsText = avsFile.ReadAll()

  9. avsFile.close()

  10. var trimLine, prefix, outputText

  11. 

  12. while (!trimFile.AtEndOfStream) {

  13.     trimLine = trimFile.ReadLine()

  14.     prefix = /^\d+/.exec(trimLine)

  15.     outputText = avsText.split(/^#trim#$/m).join(trimLine)

  16. 

  17.     outputAvsFile = fso.OpenTextFile(

  18.         'prefix_' + prefix + '.avs', ForWriting, true

  19.     )

  20.     outputAvsFile.Write(outputText)

  21.     outputAvsFile.close()

  22. }

  23. trimFile.close()
复制代码
作者: sumirecccp    时间: 2016-9-17 20:11

回复 8# DiamondbacK


    厉害啊，看来以后要多找点课题方便你练手了
作者: pcl_test    时间: 2016-9-17 21:43

本帖最后由 pcl_test 于 2016-9-17 21:59 编辑 
  1. powershell -c "$avstext=(gc 'test1.avs');gc 'trim.txt'|%%{$n='prefix_'+($_ -replace '^\s*(\d+).+','$1')+'.avs';$avstext -replace '^\s*#trim#\s*$',$_|Out-File $n}"

  2. pause
复制代码
  1. #*第三方http://www.bathome.net/s/tool/index.html?key=gawk

  2. #*&cls&gawk -f "%~f0" "trim.txt"&pause&exit

  3. BEGIN{

  4.     while(getline<"test1.avs">0){i++;avstext[i]=$0;if($0~/^[[:space:]]*?#trim#[[:space:]]*?$/&&!f)f=i}

  5. }

  6. {

  7.     match($0,/^[[:space:]]*?([0-9]+)/,n);

  8.     for(i=1;i<=length(avstext);i++)print (f!=i?avstext[i]:$0)>"prefix_"n[1]".avs"

  9. }
复制代码
  1. //&cls&cscript -nologo -e:jscript "%~f0"<"test1.avs" "trim.txt"&pause&exit

  2. 

  3. var fso = new ActiveXObject('Scripting.Filesystemobject');

  4. var avstext = WSH.StdIn.ReadAll();

  5. fso.OpenTextFile(WScript.Arguments(0), 1).ReadAll().replace(/[^\r\n]+/g, function(a){

  6.     fso.CreateTextFile('prefix_' + a.match(/^\s*?(\d+)/)[1] + '.avs', 2).Write(

  7.         avstext.replace(/^\s*?#trim#\s*?$/m, a)

  8.     );

  9. });
复制代码
作者: sumirecccp    时间: 2016-9-17 22:53

回复 10# pcl_test


    powershell更简洁，只用一句话



欢迎光临 批处理之家 (http://bbs.bathome.net/) Powered by Discuz! 7.2