Try perl -wle 'print 0+[1]'; it will print a very big number, as it converts the pointer to an anonymous list ([1]) to an integer. Thus, $a[[1]]=1 creates a very large array, as it has to set the (0+[1])-th element of @a to 1.
Update: Abigail-II was somewhat faster to submit an answer, and his is actually cleaner than mine.
In reply to Re: (3) Out Of Memory error at 950MB with 14GB free RAM
by ambrus
in thread Out Of Memory error at 950MB with 14GB free RAM
by aburker
For: | Use: | ||
& | & | ||
< | < | ||
> | > | ||
[ | [ | ||
] | ] |