my $some_index = 0;
  while ($thing = $thingies->next) {
    my $some_index = $thing->something_or_other;
    last if (test_for_fitness($some_index));
  }