html读取文件写成表格,如何读取HTML文件中表格的值并将它们存储在Perl中？

我读了很多问题和很多答案，但我找不到我的问题的直接答案。所有的答案都是非常一般的，或者与我想要做的不同。我到目前为止，我需要使用HTML :: TableExtract或HTML :: TreeBuilder :: XPath，但我不能真正使用它们来存储值。我可以以某种方式获取表格行值并用Dumper显示它们。如何读取HTML文件中表格的值并将它们存储在Perl中？

事情是这样的：

foreach my $ts ($tree->table_states) {

foreach my $row ($ts->rows) {

push (@fir , (Dumper $row));

} }

print @sec;

但是，这是不是真的做什么我要找的。我补充一点，我想存储的值HTML表的结构：

Table 1 bla bla bla

Foo	Bar
Foo-1	Bar-1
Formula	Formula1-1 Formula1-2 Formula1-3 Formula1-4 Formula1-5
Foo-2	Bar-2
Foo-3	Bar-3 Bar-3-1

这将是方便，如果我能行的值存储为对在一起。预期的输出将是类似数组的东西，其值如下： (Foo，Bar，Foo-1，Bar-1，Formula，Formula-1 Formula-2 Formula-3 Formula-4 Formula-5，.. ..) 对我来说重要的是学习如何存储每个标签的值以及如何在标签树中移动。

+1

你能用预期的输出编辑你的问题吗？ –

2012-04-23 13:59:06