[% USE xpath = XML.XPath(file => "./filename.xml") %]
[% FOREACH section1 = xpath.findnodes('document/section1') %]
[% section1.getAttribute('title') %]
[% FOREACH node = section1.findnodes('*') %]
[% IF node.getName() == 'section2' %]
[% node.getAttribute('title') %]
[% FOREACH p = node.findnodes('p') %]
[% pvalue = p.string_value %]
[% PERL %]
my $p = $stash->get('pvalue');
$p=~s/\n/
\n/gs;
print $p;
[% END %]
[% END %]
[% ELSE %]
[% pvalue = node.string_value %]
[% PERL %]
my $p = $stash->get('pvalue');
$p=~s/\n/
\n/gs;
print $p;
[% END %]
[% END %]
[% END %]
[% END %]