Opened by andy at 2013-05-03 14:53
User since
2006-01-27
3881 Artikel
HausmeisterIn
2006-01-27
3881 Artikel
HausmeisterIn
Ich würde in die Fehlermeldung beim open noch $! ausgeben lassen; da steht der Grund drin, warum das Öffnen nicht klappte.
Schau Dir mal Zeile 8 an. In $fh1 steckt ein Filehandle, welches Du nun einem Array zuweist. Warum?
Wolltest Du eventuell aus dem Handle lesen und die Zeilen im Array haben? Dann solltest Du auch die <> verwenden: my @datei1 = <$fh1>;
Das gleiche gilt analog für Zeile 13 mit $fh2.
Damit dürften sich dann Deine Warnungen erstmal erledigen.
(Das split am ';' auf den Filehandle klappt so nicht, daher sind die Kuerzel* und Gesetz*-Variablen nicht gefüllt und undefiniert. Das wiederum löst die Warnungen aus...)
Last edited: 2013-05-31 15:38:53 +0200 (CEST)
Code (perl): (dl
)
open my $fh, '<', $filename or die "open '$filename' failed: $!\n";
Schau Dir mal Zeile 8 an. In $fh1 steckt ein Filehandle, welches Du nun einem Array zuweist. Warum?
Wolltest Du eventuell aus dem Handle lesen und die Zeilen im Array haben? Dann solltest Du auch die <> verwenden: my @datei1 = <$fh1>;
Das gleiche gilt analog für Zeile 13 mit $fh2.
Damit dürften sich dann Deine Warnungen erstmal erledigen.
(Das split am ';' auf den Filehandle klappt so nicht, daher sind die Kuerzel* und Gesetz*-Variablen nicht gefüllt und undefiniert. Das wiederum löst die Warnungen aus...)
Last edited: 2013-05-31 15:38:53 +0200 (CEST)
meine Beiträge: I.d.R. alle Angaben ohne Gewähr und auf Linux abgestimmt!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!
Die Sprache heisst Perl, nicht PERL. - Bitte Crossposts als solche kenntlich machen!