open(NEUEDATEI, ">new.txt") || die "Fehler: $!";