Thread Problem mit datei auslesen
(4 answers)
Opened by niladmirari at 2010-03-22 17:11
Hallo Leute,
kann mir Jemand erklären warum Ich beim ausführen des Codes eine Fehlermeldung bekomme. In der While-Schleife ist alles in Ordnung. Ausserhalb soll die Variable $ersetzen keinen wert besitzen,laut der Fehlermeldung. warum? Danke im Voraus. Ausgabe des Programms mit der Fehlermeldung: ausgabe1:Suche ein zitat von einstein Use of uninitialized value $ersetzen in concatenation (.) or string at temp.pl l ine 15, <ERSETZEN> line 1. ausgabe2: Code (perl): (dl
)
1 2 3 4 5 6 7 8 9 10 11 12 13 #!C:\strawberry\perl\bin -w use strict; my $ersetzen; open (ERSETZEN,"suchen.txt") || die "kann Datei nicht oeffnen: $!"; while($ersetzen = <ERSETZEN>){ #liest aus der datei die einzelnen zeile heraus chomp($ersetzen); print "ausgabe1:$ersetzen\n"; } print "ausgabe2:$ersetzen\n"; Last edited: 2010-03-22 17:17:51 +0100 (CET) |