@echo off
mode con lines=3000
set info=互助互利,支付宝扫码头像,感谢打赏
rem 有问题,可加QQ956535081及时沟通
title %info%
cd /d "%~dp0"
powershell -NoProfile -ExecutionPolicy bypass ^
    $enc=[Text.Encoding]::UTF8;[System.Collections.ArrayList]$s=@();^
    $files=@(dir^|?{('.txt' -eq $_.Extension) -and ($_ -is [System.IO.FileInfo])});^
    for($i=0;$i -lt $files.length;$i++){^
        write-host $files[$i].Name;^
        write-host ('-'*20);^
        $text=[IO.File]::ReadAllText($files[$i].FullName,$enc);^
        $m=[regex]::matches($text,'\"pdfnum\":\"(\d+)\"');^
        foreach($j in $m){^
            write-host $j.Groups[1].value;^
            [void]$s.add($j.Groups[1].value);^
        };^
    };^
    [IO.File]::WriteAllLines('#result.log', $s, [Text.Encoding]::Default);
:end
echo;%info%
pause
复制代码

grep -Po "\"pdfnum\":\"[0-9]{8}\"" 1.txt | more > 2.txt
复制代码

my $line = '{"indexCadalInfoList":[{"id":"539168","title":"古史研究","title_old":"古史研究·第二集·上册","title_keyword":"古史研究·第二集·上册","title_standard":"古史研究·第二集·上册","title_handle":"古史研究·第二集·上册","pdfnum":"06342858","pdfnum","status":"1","tag_library":"古史;研究;上册;三十年代;**二十六年;**;专著","borrow_times":null,"booklist_id":null,"catalogue":null,"collect_num":"0","click_num":"0","comment_num":"0","creator":"卫聚贤（编）","creator_old":"卫聚贤（编）","creator_keyword":"卫聚贤（编）","creator_stop":"卫聚贤（编）","subject":null,"subject_old":null,"description":"本书出版者不详。","description_standard":"本书出版者不详。","description_old":"本书出版者不详。","publisher":null,"publisher_old":null,"date":"1937","date_standard":"1937","date_old":"1937-04（**二十六年）","title_standard":"古史研究·第二集·下册","title_handle":"古史研究·第二集·下册","pdfnum":"06342859","status":"1","tag_library":"古史;研究;下册;三十年代;**二十三年;**;专著","borrow_times":null,"booklist_id":null,"catalogue":null,"collect_num":"0","click_num":"0","comment_num":"0","creator":"卫聚贤（编）","creator_old":"卫聚贤（编）","creator_keyword":"卫聚贤（编）","creator_stop":"卫聚贤（编）","subject":"史评-中国-古代-文集","subject_old":null,"description":"本书出版者不详。","description_standard":"本书出版者不详。",';
.say for $line.comb(/pdfnum'":"'<( \w+ )>'"'/);
复制代码