Step 4: Print a Test

foreach my $above ( 
  above_average(qw/ 2 8 5 0 1 12 4 /) ) {
    print "$above was above average\n";
}