$ perl -we 'for(0..999999999){last}'
$ perl -we 'for(reverse 0..999999999){last}'
Out of memory!
$