my $ticks = 0;
   while (1) {
      $_->update($ticks) foreach (@objects);
      $screen->draw(@objects);
      $ticks++;
   }