html - Perl - 按 "table"标签及其内容拆分 html 代码

Question

我正在尝试通过“table”标签及其内容拆分一段 html 代码。

所以，我试过了

my $html = 'aaa<table>test</table>bbb<table>test2</table>ccc';
my @values = split(/<table*.*\/table>/, $html);

在此之后，我希望@values 数组看起来像这样:数组('aaa'，'bbb'，'ccc')。但它返回这个数组:数组('aaa'，'ccc')。谁能告诉我如何为拆分函数指定应该分别解析每个表？

谢谢!

Answer 1

你的正则表达式是贪婪的，把它改成/<table.*?\/table>/它会做你想做的。但是如果您要进行任何严肃的工作，您应该真正研究一个合适的 HTML 解析器。搜索 CPAN应该找到适合您需求的。