12
# Daten in den Hash schreiben $datensaetze{$dat}{$name}=$wert;
# alles gefundenen ausgebenprint Dumper(\%datensaetze)."\n";