523066680

即使是XP，涉及HTML解析的问题仍然建议换别的语言工具（lua, python, ahk, 什么都好，lua还能转exe呢）。
提取 <title> 示例

use Mojo::DOM;
use File::Slurp;
grep { printf "%s %s\n", $_, Mojo::DOM->new(read_file $_)->at("title")->text } glob "*.html";
复制代码