Select Code to Download

our $var;
local $var;

sub sum {
    our @a
...
my @data = getNums();

my $sum = sum( \@data );

sub sum {
    my $aref = shift;
...
my @data = getNums();

my $sum = sum( \@data );