标题: [原创]查找关键字并显示其下5行的批处理
[打印本页]
作者: 无奈何
时间: 2005-10-2 00:01
标题: [原创]查找关键字并显示其下5行的批处理
刚才在 CCF 看到有人发帖寻求 “查找含有关键字的某行,同时把此行下面8行都提取出来” 的方法。闲来无事写了个批处理,可惜没有 CCF 的帐户,发出来和大家分享。
内容其实很简单,活跃一下气氛。
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
:: find5line.bat -- 从文本查找关键字并显示其下5行
:: by: 无奈何 - 2005-10-1 - 联系:wunaihe@gmail.com
:: 用法:直接运行,显示输出。
:: 说明: 适用环境 Win2000 以上,实测 WinXP。
::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::::
@echo off
setlocal ENABLEDELAYEDEXPANSION
set /p str=请输入关键字:
set /p name=输入文件名:
set m=1
::获取关键字所在行
for /f "tokens=1,2* delims=:" %%a in ('findstr /n /C:"!str!" !name!') do @(
set line=%%a
set /a line-=1
set n=1
echo.
echo 查找到第 !m! 个匹配
set /a m+=1
::显示关键字及其下5行
for /f "delims=" %%i in ('more +!line! !name!') do (
if !n! LEQ 5 echo %%i
set /a n+=1
)
)
endlocal
作者: 无奈何
时间: 2005-10-2 14:02
写完了以后觉得没有太大实用,因为 GNU grep 可以轻松实现。
grep 的实现方法:
grep -A5 "string" file.txt
作者: bush
时间: 2005-10-3 00:51
标题: 工具是丰富多彩的,但过程是一种乐趣~
作者: 无奈何
时间: 2005-10-3 23:45
再续一帖。
在 CCF 又看到 hitme 的回复。如下:
用法:cmd下
限制:只能支持某行,而非某些行
find8 "关键字" 文本文件名
@echo off
setlocal ENABLEDELAYEDEXPANSION
for /f "tokens=1 delims=" %%i in ('find /n %1 %2^|more +2') do (
set min=%%i
set /a max=!min! + 8
)
for /f "tokens=1* delims=" %%i in ('find /n /v "" %2^|more +2') do (
if %%i geq !min! (if %%i leq !max! (
if "%%j"=="" (echo.) else (echo.%%j)))
)
endlocal
思路很好,只是不支持多行匹配。
我小改一下:
@echo off
setlocal ENABLEDELAYEDEXPANSION
for /f "tokens=1 delims=" %%i in ('find /n %1 %2^|more +2') do (
set min=%%i
set /a max=!min! + 8
echo.
for /f "tokens=1* delims=" %%i in ('find /n /v "" %2^|more +2') do (
if %%i geq !min! (if %%i leq !max! (
if "%%j"=="" (echo.) else (echo.%%j)))
))
endlocal
Last edited by 无奈何 on 2005-10-3 at 23:46 ]