for (my $iter = create(...); my ($value) = $iter->get(); $iter->inc() ) {
    ...BODY... 
}