The Perl Toolchain Summit needs more sponsors. If your company depends on Perl, please support this very important event.
 / 
XML-DOM-Lite-0.01
River stage one • 1 direct dependent • 2 total dependents
++
/ XML::DOM::Lite::NodeIterator

NAME

NodeIterator - DOM style node iterator

SYNOPSIS

 use XML::DOM::Lite::Node::Constants qw(:all);

 my $nfilt = XML::DOM::Lite::NodeFilter->new(sub {
     my $node = shift;
     if ($node->tagName == 'storage') {
         return FILTER_ACCEPT;
     } else {
         return FILTER_SKIP;
     }
 });

 my $niter = XML::DOM::Lite::NodeIterator->new(
     $template,
     SHOW_ELEMENT, # bitwise combinations supported eg. SHOW_ELEMENT | SHOW_TEXT
     $nfilt,
 );

 my $node = $niter->nextNode();