foreach (@output) {
                print "Round $i\n " ;
                print "$_\n" ;
                $i++ ;
               sleep(1) ;
            }

##</code><code>##

foreach (@output) {
  print "$_\n" ;
  }