#-- Sample code
use strict;
use XML::Simple;

my $mXML;

$mXML = XMLin('./in.xml',forcearray => 1);