«

Some code that used to work fine with perl 5.8.8 now generates a
warning when I run it with perl 5.10.0. The error is caused by a
recursive regex that is supposed to match a balanced expression.
This regex is defined using qr//, and is assigned to the variable
$pex, and mentions this variable in its definition.

The warning message is:

Variable "$pex" will not stay shared at (re_eval 5) line 2.
Variable "$pex" will not stay shared at (re_eval 6) line 2.

Here's the beast:

my $pex;
$pex = qr/
\{
(?:
(?:
"
( (?> (?:[^"\\]|\\[^"])* ) (?> \\" (?:[^"\\]|\\[^"])* )* )
"
|
(?!\{) ( [^",]* ) (?<!\})
|
(??{ $pex })
)
(?:
,
(?:
"
( (?> (?:[^"\\]|\\[^"])* ) (?> \\" (?:[^"\\]|\\[^"])* )* )
"
|
(?!\{) ( [^",]* ) (?<!\})
|
(??{ $pex })
)
)*
)?
\}
/x;

I want to fix whatever it is that the warning is warning about
(rather than simply turn off the warning), but it's not clear to
me exactly what the problem is (especially since this code has been
performing flawlessly up to now).

Any clarifications of what the error message is actually saying,
or suggestions to fix the problem would be much appreciated.

Many thanks in advance!

Gabe

In <s3gpp6-> Ben Morrow <> writes:

>The workaround is to use 'our' variables instead.

Thanks.

G.

On Mon, 5 Oct 2009 14:50:07 +0000 (UTC), gb345 <> wrote:

>
>
>
>
>Some code that used to work fine with perl 5.8.8 now generates a
>warning when I run it with perl 5.10.0. The error is caused by a
>recursive regex that is supposed to match a balanced expression.
>This regex is defined using qr//, and is assigned to the variable
>$pex, and mentions this variable in its definition.
>
>The warning message is:
>
>Variable "$pex" will not stay shared at (re_eval 5) line 2.
>Variable "$pex" will not stay shared at (re_eval 6) line 2.
>
<snip>
>
>I want to fix whatever it is that the warning is warning about
>(rather than simply turn off the warning), but it's not clear to
>me exactly what the problem is (especially since this code has been
>performing flawlessly up to now).
>
>Any clarifications of what the error message is actually saying,
>or suggestions to fix the problem would be much appreciated.
>
>Many thanks in advance!
>
>Gabe

I don't get that message on my 5.10.0 multi-threaded x86 build
(although seen it before). Its probably the usage, certain parts
were untouched.

Can you post a sample usage that generates the warning.

Also, I don't see how this matches balanced text/expression.
It doesen't on my sample. Maybe you could describe what it is
you are trying to get with it. Are you trying to capture?

-sln

On 2009-10-05, gb345 <> wrote:
> In <s3gpp6-> Ben Morrow
> <> writes:
>
>>The workaround is to use 'our' variables instead.
>
> Thanks.

And your regex smells like "parsing HTML with regexes" (it's not but it
smells). Consider making regular parser.


--
Torvalds' goal for Linux is very simple: World Domination
Stallman's goal for GNU is even simpler: Freedom