http://www.perlmonks.org?node_id=327916


in reply to Re: Re: Out Of Memory error at 950MB with 14GB free RAM
in thread Out Of Memory error at 950MB with 14GB free RAM

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.