Select Code to Download

sub genIterator {
    my $tree = shift;
...
         return;     # empty stack
    }
}

my @data = [ [ 0 ], 1, 2, [ 3, 4, 5 ], 6, [ 7, 8, [ 9, 10 ], [ 11, [ 1
+2 ], 13 ], ], 14 ];

...
12
13
14