Select Code to Download

sub popnum3 {
    my @inner_aob = @{ shift @_ }; # reconstitute a reference

sub popnum3 {
   my $aobref = shift @_;  # Just pass and use the ref instead.