Help for this page
sub average { my $average; $average = sum(@_)/ scalar(@_); return($average); }
sub average { sum(@_) / scalar(@_) }
sub average { ... return $average; }