[文本处理] 批处理怎样统计文本行，删除多余的文本

ai8866

有很多个文本，每个文本内容有1－100行
文本内容如下
文本1 有2行内容
1230 4676 466 198
456  946 491 19833
文本2 有4行内容
132 给你  164 1916
46431  1916   1943  996
111
222
文本3 有10行内容
1111111.11111.11111 11111
3333.2222 222 222 2 2  111
1333
1333
1333
1223
1222
12222
1
1

很多文本我只想找到4行的文本 保留下来其他的都文本都删除

yhcfsr

@echo off
for /r %%a in (*.txt) do (
	set "fname=%%a"
	call :countLines
)
pause&&exit /b 

:countLines
for /f "delims=[]" %%i in ('find /n /v ".*"^<"%fname%"') do (
	set count==%%i
	if !%%i! gtr 4 goto :dealFile
)
:dealFile
if %count% equ 4 exit /b
del /f /q "%fname%"
复制代码

涉及删除操作,请当心

WHY

@echo off
for /f "tokens=1*" %%i in ('find /c /v "" *.txt') do (
   for /f "tokens=1,2 delims=:" %%a in ("%%j") do (
       if "%%b" NEQ " 4" echo;del "%%a"
   )
)
pause
复制代码

ai8866

十分感谢大神