#!C:/bin/perl -w 
open(SCHREIBEN,">> neu.txt") or die "Fehler beim Öffnen von 'neu.txt': $!\n";
printf(SCHREIBEN "Just another Perl hacker\n");
close(SCHREIBEN) or die "Fehler beim Schließen von 'neu.txt': $! \n";
print("Just another Perl hacker\n");