Hi,
You can do in XML Simple itself by passing KeyAttr => 1. Hope using for loop you can take the value of id.
#!/usr/bin/perl
use strict;
use warnings;
use XML::Simple;
use Data::Dumper;
my $xml_simple = XML::Simple->new( KeepRoot => 1, KeyAttr => 1, For
+ceArray => 1 );
my $response_hash = eval{ $xml_simple->XMLin( "cars.xml" ) };
print Dumper($response_hash);
Output :
$VAR1 = {
'root' => [
{
'unsold' => [
{
'car' => [
{
'model' => [
'Hyundai'
],
'mileage' => [
'20000'
]
},
{
'model' => [
'Jeep'
],
'mileage' => [
'10000'
]
}
]
}
],
'footnotes' => [
{
'footnote' => [
{
'content' => 'F
+1 text',
'id' => 'F1'
},
{
'content' => 'F
+2 text',
'id' => 'F2'
}
]
}
]
}
]
};