$|++; for my $i ( 0 .. 5) { print $i, "\n"; print `ls -la`; sleep 1; }