Select Code to Download

my @ARRAY=subroutine();

...
 my @array=("one", "two"," three");
 return @array;
}

return wantarray ? @array : \@array;