Forum Webscript.Ru

Программирование => Perl => Тема начата: Lastiik от 18 Апреля 2005, 12:58:17

Название: HTML::TableContentParser
Отправлено: Lastiik от 18 Апреля 2005, 12:58:17

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 вообще нигде не присутствует

как быть?