http://qs321.pair.com?node_id=611641


in reply to force elements in XML::Smart

Hi

You can use XML::Simple module it will be simple. To parse xml or to create xml you can simply use XML::Simple.
use strict; use warnings; use XML::Simple; use Data::Dumper; my $xml_input = qq{<Body><Foo>Bar</Foo></Body>}; my $xml_simple = XML::Simple->new(KeepRoot => 1, KeyAttr => 1, ForceAr +ray => 1); my $result = $xml_simple->XMLin($xml_input); print "\nParsed xml with output as reference..", Dumper($result); my $result_xml = $xml_simple->XMLout($result); print "\nConstructed xml using reference..", $result_xml;