Unbuffered perl io
#!/usr/bin/perl binmode(STDOUT,":unix"); #requires PerlIO for (0..9) { print "."; sleep 1; } print "\n";