#!/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);

$VAR1 = {
          'DOCCAD' =>{
                      'Attribute' =>[
                                     {
                                      'Value' => 'CATIA V5'
                                      'Name' => 'CATSystem'
                                     }
                                    ]
              },
         };