in reply to Re (tilly) 1 (perl): What Happened...(perils of porting from c)
in thread What Happened...(perils of porting from c)
That was beautiful. I'm writing primarily so more people can see it. I also did a little rewrite that isn't an improvement, per se, but is AWTDI and may help people understand what's going on. (Iterating instead of recursing.)
Caution: Contents may have been coded under pressure.
I made it so it changes elements on the right fastest, like a counter.sub ret_iter { my $sub = shift; while (my $range = pop) { my $inner = $sub; $sub = sub { $inner->(@_, $_) for @$range }; } return $sub; }
Caution: Contents may have been coded under pressure.
|
---|
In Section
Seekers of Perl Wisdom