my $iterator = &foo();

  while($iterator->()) {
    # do something
  }