Re: Seg fault with HTML::Parser
According to Gisle Aas:
> The test case is now down to:
>
> use HTML::Parser;
> my $x = HTML::Parser->new(api_version => 3);
> $x->handler(end => sub { push(@row, (1) x 505); 1 }, "");
> $x->parse("</TD>");
>
> When running it with 'perl -Dts' I get:
>
> (xxx.pl:4) repeat
> => ... IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1)
> IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1) IV(1)
> (xxx.pl:4) push
> => \HV() PV("</TD>"\0) IV(505)
> (xxx.pl:4) leavesub
> => [STACK UNDERFLOW!!!]
Wait a minute. What happened to the "const" for the "1"?
--
Chip Salzenberg - a.k.a. - <chip@pobox.com>
"I wanted to play hopscotch with the impenetrable mystery of existence,
but he stepped in a wormhole and had to go in early." // MST3K
Reply to: