Help for this page

Select Code to Download

Select or download this

use warnings;
use strict;
...

print "Average: ", $nums[0], " to ", $nums[$#nums], " = ", $sum / scal
+ar @nums;

Select or download this
```
Average: 1 to 10 = 5.5
```