perl -e 'use v5.10; $| = 1; for (1..10) {print $_; sleep(1);}'