Re^4: Segmentation fault

[martin]

in reply to Re^3: Segmentation fault
in thread Segmentation fault

If you're really careful, you can clean up the linked list before it goes out of scope and prevent this error:

[two-way linked list example]

True, but way too much trouble. You may keep the original structure and just add a non-recursive disassembly:

my $i = 30000;
my %h = (new => {});
my $r = \%h;
for (0..$i) {
   print $_, "\r";
   $r = $r->{new};
   $r->{new} = {};
}
$r = $h{new};
undef %h;
while ($r) {
    $r = $r->{new};
}
print "end\n";

[Joost]

/me slaps forehead

ofcourse - that's much better. :-)

I did try something like that, but for some reason I couldn't get it to work right.