Beefy Boxes and Bandwidth Generously Provided by pair Networks
The stupid question is the question not asked

Re^5: Segmentation fault from XML::Twig::Elt

by mirod (Canon)
on Dec 06, 2011 at 18:36 UTC ( #942076=note: print w/replies, xml ) Need Help??

in reply to Re^4: Segmentation fault from XML::Twig::Elt
in thread Segmentation fault from XML::Twig::Elt

The bug is in Perl itself, and seems to be fixed in 5.15.5.

The following code, which is the simplest I have found to trigger the problem, causes a segmentation fault for versions up to 5.14.2, but not in 5.15.5 or bleadperl:

#!/usr/bin/perl use strict; use warnings; use Scalar::Util 'weaken'; # the number of iteration that causes a segmentation fault varies # on my machine, 5.14.2 18700, 5.12.4 20147, blead # at these values, the bug shows up most of the time but not always my $ITER= $ARGV[0] || 18700; my $head= {}; my $tail= $head; foreach (1..$ITER) { my $new_tail= { p => $tail }; weaken( $new_tail->{p}); $tail->{n}= $new_tail; $tail= $new_tail; } print "done\n";

Log In?

What's my password?
Create A New User
Domain Nodelet?
Node Status?
node history
Node Type: note [id://942076]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others chilling in the Monastery: (2)
As of 2021-09-28 14:29 GMT
Find Nodes?
    Voting Booth?

    No recent polls found