Select Code to Download

use strict;
use warnings;
...
my $tree = decode_json($text);
json_tree_to_xml_tree($tree);
print XMLout($tree);

use strict;
use warnings;
...
my $tree = decode_json($text);
json_tree_to_xml_tree($tree);
print XMLout($tree);