#!/usr/bin/perl
# Module verwenden
use XML::Simple;
use XML::Parser;
use Data::Dumper;
# Objekt erstellen
$xml = new XML::Simple; #(KeyAttr=>'Catia');
# XML-Datei einlesen
$data = $xml->XMLin('data.xml');
# Ausgabe
print Dumper($data);