Select Code to Download

#!usr/bin/perl -w
use strict;
...
}

$ perl test.pl test.xml
Bork_40kbps_44khz.mp3Bork_16khz.awbBork.rmf

my @nodes = $xpc->findnodes('//mp3Resource/Borkbot:resourceFilename');
foreach my $node (@nodes) {
    print $node->to_literal;
}

<?xml version="1.0" encoding="UTF-8" standalone="yes"?>
<BorkProduct xmlns="http://www.Borkbot.net/telcel/Bork" xmlns:Borkbot=
+"http://www.Borkbot.com/content" xmlns:jcr="http://www.Bork.org/jcr/1
+.0">
...
    </premium>
</BorkProduct>