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