Help for this page
$ perl -e 'for(1..10) {print ".\n"; sleep 1}'
$ perl -e 'for(1..10) {print "."; sleep 1}'