windows - 字符串匹配后输出行的批处理文件，文件名

Question

我有一个包含数千个以 tape* 开头的文本文件的目录(它们是旧 Fortran 程序的输出文件)，我需要从每个文件中提取 4 行以及提取它们的文件名。这 4 行从可预测的字符串开始向下 4 行，但我们可以在这个例子中使用“Header”:

磁带 1:

First line
...
Header
Trash1
Trash2
Trash3
Data1
Data2
Data3 
Data4 
...

我不关心这 4 条数据线之前或之后的任何内容，但我还希望在每条数据线之后输出文件名(即“tape1”)，如下所示:

Data1 tape1
Data2 tape1 
Data3 tape1 
Data4 tape1
Data5 tape2
Data6 tape2 
...

有没有关于一个简单的 Windows 批处理文件来对目录中的所有磁带*文件执行此操作的想法？

Answer 1

@echo off
setlocal EnableDelayedExpansion

for /F "tokens=1,2 delims=:" %%a in ('findstr /N "Header" tape*') do (
   (for /L %%i in (-2,1,%%b) do set /P "="
    for /L %%i in (1,1,4) do set /P "line=" & echo !line! %%a
   ) < "%%a"
)