Re^4: Overcoming addiction to Lisp

[Anonymous Monk]

Maybe I missed it, but why would dostrings need to be a macro, instead of a function? And if you don't like making up non-sense names, just use perl's default name, $_. Besides, it really sounds like you should be using the builtin list traversal operators like grep, map, and foreach instead of rolling your own.

[runrig]

...it really sounds like you should be using the builtin list traversal operators...

The code is not traversing a list. It is creating an iterator, and executing a block of code for each item returned by the iterator. You might argue that a foreach{...} is an iterator, but that would require generating the entire list first, which may not be appropriate here. In perl it would be more like:

my $nxt_str = make_strings($n);
while (my $str = $nxt_str->()) {
  #..do stuff with $str
}

[Anonymous Monk]

Or else you could use a tied array, and that way you'll get to use all the standard array goodies, without reinventing the wheel.

[runrig]

A tied array would require more infrastructure (i.e. it's more cumbersome to make, which is just MHO and an arguable point), and I don't see that creating a simple iterator is reinventing the wheel, especially seeing as how there's a pretty decent book out with chapters on this very thing.