open my $fh, '<', $datei or die $!;