Help for this page
sub sum { reduce { $a + $b } 0, @_; ... sub std_dev { sqrt variance (@_); }
sub reduce (&@) { my $code_ref = shift; ... } return $result; }