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. - <[EMAIL PROTECTED]>
"I wanted to play hopscotch with the impenetrable mystery of existence,
but he stepped in a wormhole and had to go in early." // MST3K
--
To UNSUBSCRIBE, email to [EMAIL PROTECTED]
with a subject of "unsubscribe". Trouble? Contact [EMAIL PROTECTED]