call :loop "%%H", call , , % .
, call :func myVar.
call , - .
for-loop - ! carets ^.
, .
set infile=e:\file.txt
set outfile=e:\outfile.txt
setlocal DisableDelayedExpansion
for /f "delims=" %%A in ('"findstr /n ^^ %infile%"') do (
set "line=%%A"
setlocal EnableDelayedExpansion
set "line=!line:*:=!"
(echo(!line!)>>%outfile%
rem CALL :func line
endlocal
)