use XML::Simple;
use Data::Dumper;

my $hash_ref = XMLin($xml_file);
print Dumper($hash_ref);