Help for this page

Select Code to Download

Select or download this

  sub field
    { my( $parent, $tag)= @_;
...
      return unless( $elt->hasChildNodes);
      return join( '', map { $_->getData } $elt->getChildNodes);
  }