OK, I'm really stuck now. This is what I have so far:
use strict;
my $number=0; float:
my $line; float:
my $score; float:
my $std; float:
my $avg; float:
my $name; float:
my $sum;
open(IN, "pa5c.dat") || die ("Can't open file $!\n");
while($line = <IN>){
chomp($line);
++$number;
$sum = $sum + $score;
($name, $score) = split(/:/, $line);
print "$name $score\n";
}
$avg = $sum / $number;
printf "%3.2f\n", $avg;
__END__#pa5.pl
Now, when I run it, the average comes out as 62.33 instead of 75.00 The file contains 6 scores: 70 74 80 82 68 76. But for some reason, its not reading the last score of 76. HELP ME PLEASE!!
Edit Masem 2001-12-19 - Edited title from "HELP" to fix searching problems