[文本处理] 批处理如何获取指定文件夹下每个txt文本除了第一行和空白行外的行数并添加到文件名里

cloudinamoy

BAT怎样统计文件夹下txt文档的行数并重命名文件？
我想统计文件夹下及子文件夹下所有txt文档的行数并重命名文件
确切地说，我想统计文本除了第一行其他所有行但不包含空行，假设a.txt统计出的行数是num，然后将该文件重命名为anum.txt，求助啊，折腾了好久没弄出了

terse

@echo off
for /f "delims=" %%i in ('dir /b /a-d /s *.txt') do (
	(more +1 "%%i" |findstr . |find /v /c "")>$
	for /f %%j in ($) do echo ren "%%i" %%~ni%%j%%~xi
)
del $
pause
复制代码

CrLf

调用第三方工具 sed 和 uniq：

@echo off
for /f "tokens=1*" %%a in ('findstr /s /n . *.txt 2>nul ^| sed "/[^:]*:1:/d;s/:.*//" ^| uniq -c') do (
   ren "%%b" "%%~nb%%a.txt"
)
复制代码

cloudinamoy

回复 2# terse

怎么找不到重命名的文件？

cloudinamoy

回复 3# CrLf

第三方工具不懂啊

cloudinamoy

根据上面的启发写出来了，谢谢！

@echo off

setlocal ENABLEDELAYEDEXPANSION 

@set filepath=G:\批处理\20130819

for /r %filepath% %%a in (*.txt) do (

	@set /a num=0 
	for /f " skip=1 " %%b in (%%a) do (set /a num+=1)
	ren %%a  %%~na!num!%%~xa

)

pause
复制代码

terse

回复 4# cloudinamoy
去掉 后面 echo 即可

cloudinamoy

回复 7# terse


    哦，是哦，怎么没看出来，谢啦~

gawk

回复 5# cloudinamoy


    不懂没关系，下载之后放到system32文件夹下面就能直接调用了。

cloudinamoy

回复 9# gawk


    哦，谢谢！