perl -e'$x[$_]=42 for 1..40_000_000; <>'

##</code><code>##

perl -e'$x[$_]="foo" for 1..40_000_000; <>'