Help for this page
my @ARRAY=subroutine(); ... my @array=("one", "two"," three"); return @array; }
return wantarray ? @array : \@array;