XML::Simple Usage

AlexTape has asked for the wisdom of the Perl Monks concerning the following question:

Omniscient Monks,

I try to use XML::Simple :-)

my $xml = XML::Simple->new();
my $xml_Load = $xml->XMLin("Input.xml");
print Dumper $xml_Load;
$xml->XMLout($xml_Load,OutputFile => "Output.xml");
[download]

Input.xml

<opt>
    <global>
        <glob1 value="g1v" />
        <glob2 value="g2v" />
        <glob3 value="g3v" />
    </global>
    <parmsets>
        <example>
            <local>
                <location value="location" />
                <loc2 value="loc2v" />
                <loc3 value="loc3v" />
            </local>
            <regional>
                <region1 value="region1v" />
                <region2 value="region2v" />
                <region3 value="region3v" />
            </regional>
        </example>
    </parmsets>
</opt>
[download]

Output.xml

<opt>
  <global name="glob1" value="g1v" />
  <global name="glob2" value="g2v" />
  <global name="glob3" value="g3v" />
  <parmsets name="example">
    <local name="loc2" value="loc2v" />
    <local name="loc3" value="loc3v" />
    <local name="location" value="location" />
    <regional name="region1" value="region1v" />
    <regional name="region2" value="region2v" />
    <regional name="region3" value="region3v" />
  </parmsets>
</opt>
[download]

i´m not able to force xml::simple to keep the structure of the input file..
even if i use the output structure i get really big troubles if there is only one note in <parmsets>
because xmlin did not mention it as a hash anymore..

anybody got an leading idea ?

$perlig =~ s/pec/cep/g if 'errors expected';

Comment on XML::Simple Usage Select or Download Code

Replies are listed 'Best First'.
Re: XML::Simple Usage by toolic (Bishop) on Sep 19, 2012 at 12:20 UTC
XML::Simple `ForceArray` may do what you need: use warnings; use strict; use XML::Simple; my $xml = XML::Simple->new(ForceArray => 1); my $xml_Load = $xml->XMLin("Input.xml"); $xml->XMLout($xml_Load,OutputFile => "Output.xml"); # Here is the Output.xml file: __END__ <opt> <global> <glob1 value="g1v" /> <glob2 value="g2v" /> <glob3 value="g3v" /> </global> <parmsets> <example> <local> <loc2 value="loc2v" /> <loc3 value="loc3v" /> <location value="location" /> </local> <regional> <region1 value="region1v" /> <region2 value="region2v" /> <region3 value="region3v" /> </regional> </example> </parmsets> </opt> [download]	[reply] [d/l] [select]
Re: XML::Simple Usage by Jenda (Abbot) on Sep 19, 2012 at 13:12 UTC
See Simpler than XML::Simple. It's not trivial to set XML::Simple so that the data structure produced by XMLin is consistent and even harder to set it up so that the XMLout produces something resembling the original XML. If you need to make changes to a XML and do not plan to read the result again with XML::Simple, consider using a different tool. Jenda Enoch was right! Enjoy the last years of Rome.	[reply]


Perl Monk, Perl Meditation
	PerlMonks