open my $fh,"<:utf8", $datei or die("Mist 1");