[Phoenix-pm] Fwd: perlbug-followup@perl.org: [perl #38483] panic: restartop

[Scott Walters]

Oooooh, and another one!

-scott

----- Forwarded message from andy hohorst <perlbug-followup at perl.org> -----

From: andy hohorst <perlbug-followup at perl.org>
To: bugs-bitbucket at rt.perl.org
Subject: [perl #38483] panic: restartop 
Date: Fri, 10 Feb 2006 11:36:12 -0800
Resent-From: perl5-porters-return-109588-scott=slowass.net at perl.org

# New Ticket Created by  andy hohorst 
# Please include the string:  [perl #38483]
# in the subject line of all future correspondence about this issue. 
# <URL: https://rt.perl.org/rt3/Ticket/Display.html?id=38483 >


$ perl
use re 'eval';
my $a = '(?{"})';  # note there is only one double-quote
"cookie" =~ m/$a/;
^D
panic: restartop

This is perl, v5.8.7 built for x86_64-linux
This is perl, v5.8.7 built for MSWin32-x86-multi-thread (^Z in this case)
This is perl, v5.8.7 built for cygwin-thread-multi-64int

I think I can safely say the cause of the problem is the unterminated string
in the code expression.
Bandaid? Check for unterminated strings in code expressions.
Beyond that, I have no idea.

This was found thanks to a piece of code that loads pairs of regexps and
eval strings from a file - one of the regexps used (.+)\b(?(?{!defined
$refs{'ntla}->{$1}})^) to find things that are defined in the ntla entry -
fun times.

 - andy


----- End forwarded message -----