perl - 同じ名前の子ノードを処理するにはどうすればよいですか？

Question

私は以下のテンプレートのような1000のエンティティを持つxmlを持っています：

<data>
  <row> ded</row>
   <row> def </row>
   <row> fff </row>
   <row> fff </row>

</data>

XML::Twigで解析する必要があります。

私は次のコードを使用します：

my $twig = XML::Twig->new(
twig_handlers => {
  data => sub {

        my $x1 = $_->first_child_trimmed_text('row');
        print $x1;
        #I need also here to run over the other rows and extract them

  }
} );

行を調べて抽出するにはどうすればよいですか（同じ名前です）。

Answer 1

XML :: Twigメソッドを使用できますchildren_trimmed_text()-子のリストが表示され、それを繰り返し処理できます。このようなもの：

data => sub {
    my @row_children = $_->children_trimmed_text( 'row' );
    for my $row ( @row_children ) {
       print "$row\n";
    }
}

Answer 2

twig_handlers => {
#   '/data/row'
#   '//row'
#   'row'
   '//data/row'
          => sub { print $_->get_trimmed_text },
}