while (more(...)) {
   ...
}

##</code><code>##

while (!done(...)) {
   ...
}

##</code><code>##

while (my $item = get(...)) {
   ...
}