Help for this page
our @a; local *a = shift;
\local our @a = shift;
\my @a = shift;
sub sum { \my @a = shift; ... $total += $a[ $_ ] for 0 .. $#a; return $total; }