Thread Kleines Perl Problem (10 answers)
Opened by Phipu at 2010-11-04 12:00

Linuxer
 2010-11-04 21:22
#142481 #142481
User since
2006-01-27
3890 Artikel
HausmeisterIn

user image
Ich hätte Zeile 4 eher so gedeutet, dass mit shift() das erste Element des @ARGV aus diesem entfernt und zurückgeliefert wird. STDIN wird da doch nicht bemüht?

@Phipu
Ich würde das Öffnen von Dateien auf Erfolg prüfen.
Ebenso mindestens das Schließen eines Filehandles auf welches geschrieben wurde:

Code (perl): (dl )
1
2
3
4
5
6
7
8
9
# Lesen
open my $fh, '<', $filename or die "$filename: $!\n";
# ...
close $fh;

# Schreiben
open my $wh, '>', $filename     or die "$filename: $!\n";
print $wh "Hello World\n"       or die "print to $filename: $!\n";
close $wh                       or die "close $filename: $!\n";


PS: Sehe gerade, das mit dem Öffnen/Schließen hatte Renee bereits angemerkt.
Last edited: 2010-11-04 21:26:20 +0100 (CET)
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!

View full thread Kleines Perl Problem