Allocate a list a containing n elements (n assumed to be too large for a stack) that is automatically deallocated when the program exits the scope it is declared in.
integer, dimension(:), allocatable :: a
allocate (a(n))
a := make([]T, n)
Elements have type T. a is garbage-collected after the program exits its scope, unless we let it "escape" by taking its reference. The runtime decides if a lives in the stack on in the heap.
{
my @a = (undef) x $n;
# scope ends at closing brace
}
Normally it is not necessary to initialise an array with a certain number of elements because Perl arrays grow or shrink as necessary. Simply `my @a;` is idiomatic and will work fine.
I chose `undef` because it is the scalar value that takes the least amount of memory.
deffunc():
a = [0] * n
# local variable automatically deallocated at end of functionreturn
