#!/usr/bin/perl

$|++;

for(0..7){
   print "$_\n";
   sleep 1;
}