Mark (>):
> but I think an idiomatic Perl 6 solution would have a proper lazy
> Iterator.  How do we write one of those?

Like this, I think:

$ perl6 -e '.say for gather { my $n = 1; loop { take <bon digi bon
digi>; take "bon" for ^$n; take "digi" for ^$n; ++$n } }'

That currently parses in Rakudo, but hangs since we don't have Laziness.

// Carl

Reply via email to