while (my $arg = $i->next()) {
   ...
}