Hi H4,

You can try to use XML::Simple' XMLout as long as you have a perl hash representing the data you want to write to XML.

use XML::Simple qw(XMLout);
my $data={book=>[{name=>"test",author=>"H3"},{name=>"test2",author=>"H
+4"}]};
print XMLout($data,NoAttr=>1,RootName=>"books");
[download]