Help for this page

Select Code to Download

Select or download this

use XML::LibXML;

my $parser = XML::LibXML->new;
...
__XML__

print $doc->getDocumentElement->firstChild->textContent, $/;