use HTML::TableContentParser;
$p = HTML::TableContentParser->new();
$html = read_html_from_somewhere();
$tables = $p->parse($html);
for $t (@$tables) {
for $r (@{$t->{rows}}) {
print "Row: ";
for $c (@{$r->{cells}}) {
print "[$c->{data}] ";
}
print "\\n";
}
}
данная конструкция вытаскивает не все данные таблицы, то есть
text1
text2
text3
Мне нужен текст только из table1
Достается только текст text1, text3 вообще нигде не присутствует
как быть?
