open(my $FHziel, ">", $ziel) 
  or die "Konnte die Datei $ziel nicht zum Schreiben öffnen bzw. erzeugen: $!";