Erm .... sorry to bother you with details, but ... the OP is not querying any XML. He's not parsing any XML file and while I understand that someone twisted enough might like XSLT for XML-to-something transformation, in this case that's not gonna fly. There is no XML to start with! The data are in a database and the XML is to be produced.

The data should be escaped though to prevent problems if the PACKINFO contains less-than signs or other stuff special to XML. Eg. like this:

use XML::Rules;
my $parser=new XML::Rules(rules=>{});
...
$XMLContent .= $parser->toXML(packet_ref => {packID => [$foo], packInf
+o => [$bar]}) . "\n";

# or, with formatting

# $XMLContent .= $parser->toXML(packet_ref => {packID => [$foo], packI
+nfo => [$bar]}, 0, '  ') . "\n";
[download]