JavaScript ist deaktiviert. Für eine bessere Darstellung aktiviere bitte JavaScript in deinem Browser, bevor du fortfährst.
Du verwendest einen veralteten Browser. Es ist möglich, dass diese oder andere Websites nicht korrekt angezeigt werden.
Du solltest ein Upgrade durchführen oder ein alternativer Browser verwenden.

✔Aufgabe

andreas2000

Mitglied
Hallo,

ich habe folgende Perl Aufgabe und habe leider keine Ahnung:

Skizzieren Sie ein Perl Programm, das aus einer Datei, die in jeder Zeile eine Zahl enthält, die Summe aller dieser Zahlen berechnet und ausgibt.

Wäre für Hilfe sehr dankbar.

Gruß,
Andreas.
Ich habe keine Ahnung von Perl. In PHP könnte man es so machen. Versuch doch dann mal anhand des Codes die passenden Perl Funktionen zu finden.

PHP: 
$Datei_mit_Zahlen = file("datei.txt");
$ergebnis = 0;
for($i=0;$i<count($Datei_mit_Zahlen);$i++)
{
 $ergebnis += $Datei_mit_Zahlen[$i];
}
echo "Die Summe aller Zahlen ist ".$ergebnis;
Code: 
my $file = "datei.txt";
my $sum = 0;
open(my $fh,"<",$file) or die $!;
while(<$fh>){
 $sum += $_;
}
close $fh

AltStyle によって変換されたページ (->オリジナル) /