Select Code to Download

<?xml version="1.0" encoding="UTF-8"?>
<APP:Report xmlns:APP="WWW" 
...
<Publisher>Victoria</Publisher>
</library>
</APP:Report>

my $twig= new XML::Twig();
$twig->parsefile( $_);    # build the twig 
...
  {
  print $fout1 $elt->text."\n";
}

  The book of pages|Snap|Line1|Line2|Line3|Line4|Line5|C1.X|X 6 times
  The book of pages|Snap|Line1|Line2|Line3|Line4|Line5|C1.Y|X 6 times
...
  .
  The song|Snap|Line1|Line2|Line3|Line4|Line5|C2.X|X 6
  The song|Snap|Line1|Line2|Line3|Line4|Line5|C2.Y|X 6