$Hash = @{};

type a.txt | ?{$_ -match '点击进入下载－(.*)\(1\)\.torrent'} | %{
        $key = $matches[1] -replace '[ ()]', '_';
        $Hash[$key] = $_;
}

type b.txt | group{ $_ -replace '.*?/([^/]*)_\d+_\.jpg\].*$', '$1' } | %{
        $_.Group;
        $Hash[$_.Name];
} > c.txt
复制代码

@echo off & setlocal EnableDelayedExpansion
cd /d "%~dp0"
for /f "tokens=1 delims=][" %%a in (b.txt) do (set "str=%%~nxa" & for /f "tokens=1 delims=/" %%i in ("!str:__=/!") do for /f "tokens=* delims=_" %%n in ("%%i") do set "\%%n=%%n")
(for /f "tokens=2 delims==" %%a in ('set\') do (set "str=%%a"
	for /f "delims=" %%i in (b.txt) do echo %%i|findstr /i /c:"%%a">nul && echo %%i
	for /f "delims=" %%i in (a.txt) do echo %%i|findstr /i /c:"!str:_= !">nul && echo %%i
	echo;
))>##.log
复制代码

@echo off & cd /d "%~dp0" & setlocal EnableDelayedExpansion
md NewFiles>nul 2>nul
for /f "tokens=1* delims=－(" %%a in (a.txt) do (set "str=%%b"
	(for /f "tokens=1* delims=:" %%i in ('findstr /i /n "!str:~0,-1!" b.txt') do echo %%j
	echo %%a－%%b
	)>"NewFiles\!str:torrent[ur.l]=!txt"
)
复制代码