use XML::Simple;
use Data::Dumper;
# create object
my $xml = new XML::Simple ();
# read XML file
my $data = $xml->XMLin("/tmp/hosts.xml");
print Dumper($data);