#!/usr/bin/perl
# Module verwenden
use XML::Simple;
#use Data::Dumper;
# Objekt erstellen
$xml = new XML::Simple;
# XML-Datei einlesen
$data = $xml->XMLin("K:/Programme/Perl/XML_TEST/beispiel.xml");
# Ausgabe

#print Dumper($data);
print  $data->{HISTORY}->{VERSION}->[0]->{STAND};