hash zurück geben - #6715 (Perl/CGI)

Strat

2006-01-18 17:15

User since
2003-08-04
5246 Artikel
ModeratorIn

nebenbei:

Code: (dl )

1
2

    my @lines = <RRD>;
    foreach $currentLine(@lines){

kannst du einfacher und ressourcenschonender schreiben:

Code: (dl )

while (my $currentLine = <RRD>) {

Code: (dl )

open(RRD,$Datei) or die "Could not read $rrdFile.\n";

du oeffnest $Datei, gibst aber im fehlerfalle $rrdFile aus... das kann zu verwirrung fuehren. und in $! steht in einem solchen fall eine fehlermeldung

Code: (dl )

open(RRD,$Datei) or die "Could not read $Datei: $!\n";

perl -le "s::*erlco'unaty.'.dk':e,y;*kn:ai;penmic;;print"
http://www.fabiani.net/