Select Code to Download

while (my $next = $iter->()) {
    # ...
    last if $iter->('exhausted');
}

while (my $next = $iter{next}->()) {
    # ...
    last if $iter{exhausted}->();
}