perl -e "for (1..10){print qq(.);sleep 1}"

##</code><code>##

      perl -e "for (1..10){print qq(.\n);sleep 1}"

##</code><code>##

      perl -e "$|++;for (1..10){print qq(.);sleep 1}"