perl -e "sleep 1 and print qq($_ ) for 1..$ARGV[0]" 3
1 2 3

perl -e "$|++; sleep 1 and print qq($_ ) for 1..$ARGV[0]" 3
1 2 3