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

# Objekt erstellen
$xml = new XML::Simple;

# create object
$xml = new XML::Simple (KeyAttr=>[]);

# XML-Datei einlesen
$data = $xml->XMLin("inifile.xml");

# Ausgabe
print Dumper($data);