perlquestion
nagalenoj
<p>Hi,</p>
<p> I'm using XML::Simple to parse some xml data. I find it works inconsistently for some cases. I'm just trying to make it provide consistent style of output. But, I couldn't get it. Here is my sample program.</p>
<code>
use strict;
use warnings;
use Data::Dumper;
use XML::Simple;
my $res = "<results>
<binding name=\'description\'>
<literal xml:lang=\'en\'>First article. </literal>
</binding>
</results>";
my $res2 = "<results>
<binding name=\'image_url\'>
<uri>Football.png</uri>
</binding>
<binding name=\'description\'>
<literal xml:lang=\'en\'>Second article.</literal>
</binding>
</results>";
my $result = XMLin($res);
my $result2 = XMLin($res2);
print Dumper $result;
print Dumper $result2;
</code>
<p>Output it produces is,</p>
<code>
$VAR1 = {
'binding' => {
'literal' => {
'content' => 'First article. ',
'xml:lang' => 'en'
},
'name' => 'description'
}
};
$VAR1 = {
'binding' => {
'image_url' => {
'uri' => 'Football.png'
},
'description' => {
'literal' => {
'content' => 'Second article.',
'xml:lang' => 'en'
}
}
}
};
</code>
<p>If you look at description tag. You could find the difference in the output it produced. I find, it works fine for 'Second article.' in the example. Is there any way to make it give the similar structure?</p>
<p>Thanks.</p>