$ time perl -le 'print for 1..500000'