Step 3: above_average

sub above_average {
    my (@given_numbers) = @_;
    my $average = total(@given_numbers) 
        / @given_numbers;
    my @nums_above_average;
    foreach my $given (@given_numbers) {
        if ( $given > $average ) {
            push @nums_above_average, $given;
        }
    }