标题: [文本处理] 批处理怎样删除TXT的最后一行到倒数的第n行, 并替換原文件? [打印本页]
作者: xinghua_wei 时间: 2024-3-14 15:19 标题: 批处理怎样删除TXT的最后一行到倒数的第n行, 并替換原文件?
删除文件夹下所有TXT的最后一行到倒数的第n行, 并替換原文件.
已知, 正数删除从第1行至n行的代码如下:
那么, 如果要倒数删除最后一行至倒数第N行, 那么应当如何编写?
如果不从第一行计, 而从第S行起, 至第P行呢? 包括正数及倒数. 谢谢.- @ECHO OFF
- SET TxtDir="%~dp0"
- echo.&set /p N=Please type in the end row No. (from 1 to this row, will be deleted!):
-
- CD /D %TxtDir%
- FOR /F "tokens=1 delims=" %%I IN ('DIR /A /B *.txt') DO ((MORE +%N% "%%I">"%%I_")&(DEL /A /F /Q "%%I")&(REN "%%I_" "%%I"))
- PAUSE
复制代码
作者: Five66 时间: 2024-3-14 17:24
先获取总行数
再计算删除后需要输出的行数
最后输出所需的行数
作者: 77七 时间: 2024-3-14 17:37
本帖最后由 77七 于 2024-3-14 17:41 编辑
- @echo off
- cd /d "%~dp0"
- set /a b=-2,d=-2
- for %%i in (*.txt) do (
- setlocal
- call :1 "%%i"
- endlocal
- )
- pause & exit
-
- :1
- for /f "delims=" %%a in ('find /c /v "" ^<"%~1"') do (
- echo %%a
- set n=%%a
- )
- if %b% gtr 0 (
- if %d% gtr 0 (
- set /a s=b,e=b+d-1
- ) else (
- set /a s=b+d+1,e=b
- )
- ) else (
- if %d% gtr 0 (
- set /a s=n+b+1,e=s+d-1
- ) else (
- set /a s=n+b+d+2,e=n+b+1
- )
- )
- echo 删除第 %s% - %e% 行
- (for /f "tokens=1* delims=[]" %%a in ('find /n /v "" ^<"%~1"') do (
- if %%a lss %s% (
- echo=%%b
- ) else if %%a gtr %e% (
- echo=%%b
- )
- ))>$
- move $ "%~1"
- exit /b
复制代码
b 为开始行,d 为删除行数,都可以为正、负数
作者: hfxiang 时间: 2024-3-14 20:07
回复 1# xinghua_wei
可用第3方工具sed( http://bcn.bathome.net/tool/4.9/sed.exe )删除当前目录下所有txt文件的最后10(可自行修改)行后写回原文件的脚本如下:- sed -i -n -e :a -e "1,10!{P;N;D;};N;ba" *.txt
复制代码
作者: hfxiang 时间: 2024-3-14 20:13
回复 1# xinghua_wei
删除当前目录下所有txt文件的第3~10(可自行修改)行后写回原文件的脚本如下:复制代码
作者: aloha20200628 时间: 2024-3-15 22:11
本帖最后由 aloha20200628 于 2024-3-16 09:08 编辑
截取文件中第n1至n2行的纯P老话题,似乎并无完解。
开启变量延迟+for/f skip参数,虽然效率不错,但会拦截文件中的!字符相关字段;
关闭变量延迟而借助find/findstr加注文本行序号的方法也会丢失文件中的[]字符或:字符。
还是给一个用纯P包装jscript代码的批处理脚本更便于使用,没有纯P的诸端限制,而且因采用字符集437后竟可通吃多种常见编码文件,使输出文件自动保持与输入文件编码一致...
以下代码存为test.bat运行
命令行调用参数》test.bat "源文件路径文件名" 起始行号 终止行号
生成结果文件 = "源文件路径文件名.new"- @set @v=1 //&if "%~3" neq "" cscript /e:jscript "%~f0" "%~1" %2 %3 &exit/b
- v = WSH.arguments, as = WSH.createobject('adodb.stream');
- as.mode=3, as.type=2, as.charset='437', as.open, as.loadfromfile(v(0));
- alllines = as.readtext().split('\r\n'), as.close;
- nb = (v(1)<1)? 1: v(1), ne = (v(2)>=alllines.length)? alllines.length: v(2);
- if (nb>ne) WSH.quit();
- alllines = alllines.slice(nb-1,ne);
- as.open, as.writetext(alllines.join('\r\n')), as.savetofile(v(0)+'.new',2), as.close;
- WSH.quit();
复制代码
作者: wanghan519 时间: 2024-3-16 07:01
本帖最后由 wanghan519 于 2024-3-16 10:39 编辑
sed不方便倒数,但更原始的ed脚本可以方便的倒数
一直以为ed是过时的,后来发现git、diff都在用ed脚本,相比sed确实有一些好处
ed -s a.txt <<'EOF'
2,3d
$-2,$d
w
EOF
# 删除2到3,倒数第3到最后一行
作者: 77七 时间: 2024-3-16 10:46
回复 3# 77七
修改30-36行代码,解决行首出现”[“ ”]“丢失问题- (for /f "delims=" %%a in ('find /n /v "" ^<"%~1"') do (
- set str=%%a
- setlocal enabledelayedexpansion
- if %%a lss %s% (
- echo=!str:*]=!
- ) else if %%a gtr %e% (
- echo=!str:*]=!
- )
- endlocal
- ))>$
复制代码
作者: aloha20200628 时间: 2024-3-16 13:09
6楼代码用于 '截取' n1-n2区间行,是掐头去尾取中段,test.bat应更名为 "取中段.bat"
再给一段代码用于 '删除' n1-n2区间行,是留头留尾去中段,test.bat可取名为 "去中段.bat" ,命令行用法如同6楼命令行参数
jscript代码中弃用splice()方法是因其低效,还不如用slice()+concat()
再复课一遍》因采用437字符集编码,可不必在批处理脚本中特别打理与源文件编码对应的chcp...码页切换,用一个“437”即可通吃ansi/utf-8/utf-8+BOM/gbk/gb2312/...- @set @v=1 //&if "%~3" neq "" cscript /e:jscript "%~f0" "%~1" %2 %3 &exit/b
- v = WSH.arguments, as = WSH.createobject('adodb.stream');
- as.mode=3, as.type=2, as.charset='437', as.open, as.loadfromfile(v(0));
- alllines = as.readtext().split('\r\n'), as.close;
- nb = (v(1)<1)? 1: v(1), ne = (v(2)>=alllines.length)? alllines.length: v(2);
- if (nb>ne) WSH.quit();
- for (; alllines.slice(-1)==''; alllines.pop());
- ab = alllines.slice(0, nb-1), ae = alllines.slice(ne), alllines = ab.concat(ae);
- as.open, as.writetext(alllines.join('\r\n'));
- as.savetofile(v(0)+'.new',2), as.close; WSH.quit();
复制代码
作者: aloha20200628 时间: 2024-3-16 13:21
本帖最后由 aloha20200628 于 2024-3-16 13:32 编辑
补缺》采用437字符集编码的优势有一个前提,是限于处理文件中的单字节ascii字符,其有效用法例如删除utf-8+BOM编码文件头标,删除文件尾部空行...
虽然adodb.stream可以二进制方式直接处理字节数据,但要比处理字符串麻烦,尤其是启用正则匹配...
欢迎光临 批处理之家 (http://www.bathome.net/) |
Powered by Discuz! 7.2 |