$ perl -le '$x=2**30; print $x; $a[$x]=0'
1073741824
Out of memory during array extend at -e line 1.