Select Code to Download

sub make_iter {
    my @values = @_;
...

my $iter = make_iter(3,4,6,7);
print while( $_ = $iter->() );

sub make_iter_deeper {
    my @AoA = @_;
...

my $iter = make_iter_deeper([3,4,6,7]);
print join(',',@_) . "\n" while( @_ = $iter->() );

sub make_iter_deeperer {
    my @AoA = @_;
...
        return @return;
    }
}

sub _NL_Iter
{
...
    };

}