[文本处理] 批处理如何提取文本文件里的网址？

grep -o "http://www.xinsuzahuo.com/saveimages/2009[^:]*.jpg" a.txt >b.txt
复制代码

grep -o "http://www.xinsuzahuo.com/saveimages/[1-9][^:]*.jpg" a.txt >b.txt
复制代码

grep -o "http:[^:]*.jpg" a.txt >b.txt
复制代码

@echo off
setlocal enabledelayedexpansion&cls
::==============================================================

for /f "tokens=* usebackq delims=" %%a in ("1.txt") do (
set "src_str=%%a"
set "src_str=!src_str:"=!"
set "src_str=!src_str:<=!"
set "src_str=!src_str:>=!"
set "src_str=!src_str:.jpg=★!"
set "src_str=!src_str:src=★!"
echo\
for /f "tokens=1-26 delims=★" %%A in ("!src_str!") do (
echo %%A|findstr "^=http">nul&&(set "_a=%%A"&set "_a=!_a:~1!"&echo !_a!.jpg)
echo %%B|findstr "^=http">nul&&(set "_a=%%B"&set "_a=!_a:~1!"&echo !_a!.jpg)
echo %%C|findstr "^=http">nul&&(set "_a=%%C"&set "_a=!_a:~1!"&echo !_a!.jpg)
echo %%D|findstr "^=http">nul&&(set "_a=%%D"&set "_a=!_a:~1!"&echo !_a!.jpg)
echo %%E|findstr "^=http">nul&&(set "_a=%%E"&set "_a=!_a:~1!"&echo !_a!.jpg)
echo %%F|findstr "^=http">nul&&(set "_a=%%F"&set "_a=!_a:~1!"&echo !_a!.jpg)
echo %%G|findstr "^=http">nul&&(set "_a=%%G"&set "_a=!_a:~1!"&echo !_a!.jpg)
echo %%H|findstr "^=http">nul&&(set "_a=%%H"&set "_a=!_a:~1!"&echo !_a!.jpg)
)
)>>destfile.txt
call start notepad.exe destfile.txt
ping /n 4 127.1>nul&del destfile.txt
::==============================================================
:end
goto:eof
复制代码