Deine Code in Zeile 23 hat einen Fehler:

Du musst bei print auch angeben an welches Dateihandle. Fehlt es wie bei deiner Zeile 23 so wird an STDOUT (Bildschirmausgabe) ausgegeben.

Du willst aber in die Ausgabedatei schreiben, die hat das Dateihandle NEWFILE.
Also muss es so lauten:



Ich halte es allerdings für sinnvoller, statt dem Bareword eine Variable als Dateihandle zu verwenden. Siehe auch WasIsteinLexikalischerFileHandle
Und vielleicjht hilft dir auch das lesen des Tutorials Perl5Tutorial. Auf PerlMaven (de, en) und learn.perl.org gibt es diverse Tutorials.

Übrigens macht das Einrücken von Codeblöcken bei if, while, for o. ä. das ganze lesbarer.
Mit dem Perlprogramm perltidy geht das sogar automatisch.

Schaus dir doch mal an und frag gern bei Problemen weiter. ;)
Last edited: 2013-07-23 11:34:40 +0200 (CEST)