my $next = gen_iterator( 42 );
while ( my $item = $next->() ) {
    print "$item\n";
}