Select Code to Download

  yoink( \@arr, $var ); # pass an array ref and a scalar

sub yoink
{
...
    }
    @$arr_ref = @out_arr;
}