perl -le 'print for 1..5'