in reply to An iterator for (not "iterating") a recursive data structure.
There is the simple "flatten as you go" approach:
sub genIterator { my @stack = @_; return sub { splice @stack, 0, 1, @{$stack[0]} while 'ARRAY' eq ref $stack[0]; shift @stack; } }
|
|---|
| Replies are listed 'Best First'. | |
|---|---|
|
Re^2: An iterator for (not "iterating") a recursive data structure.
by BrowserUk (Patriarch) on Feb 14, 2015 at 23:02 UTC | |
by LanX (Saint) on Jul 13, 2019 at 20:13 UTC |