Select Code to Download

open (INPUT, "-Tscore.dat") || die "Cannot open input file.\n";
open (OUTPUT, ">L7AOUT.txt") || die "Cannot open file.\n";
read (INPUT, $studentname, 20);
...
close INPUT;
close OUTPUT;
exit 0;

Tom Thumb           100096093098
Mickey Mouse        088068095086
Minnie Mouse        078056088098
...
Mack Truck          095067099098
Mel Gibson          082075088079
END                 000000000000

     CLASS TEST AVERAGES

                          TEST
...
                           0.00

                           0.00