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

my $foo = XMLin('test.xml');

print Dumper($foo);