#  my $dir = './Konfigurationsdaten/';
#  my @Zeilen = glob($dir.'*.DOCFIELD');
# open(my $fh,'<',$Zeilen[0]) or die $!;
#  close $fh;