# UNIX style:
perl -e '$|++;for(1..10){ print $_;sleep 1; print "\b"}'

# dos style:
perl -e "$|++;for(1..10){ print $_;sleep 1; print \"\b\"}"