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

Re^5: Regex's, parentheses, and the mysterious ( ??{ } ) operator

by AnomalousMonk (Canon)
on Jul 12, 2013 at 18:00 UTC ( #1044042=note: print w/replies, xml ) Need Help??

in reply to Re^4: Regex's, parentheses, and the mysterious ( ??{ } ) operator
in thread Regex's, parentheses, and the mysterious ( ??{ } ) operator

... our is our

I think Anonymonk is concerned about the second appearance of  our $re within the  (??{ our $re }) regex subexpression. Although somewhat unfamiliar, I think this is kosher because our acts as a declaration of a package variable and  $re needs to be declared or pre-declared somehow to be referenced within the regex under full strictures. The following variations work identically with strictures (note no capturing groups within $re):

>perl -wMstrict -le "my $s = 'x(y) (a(b)) ()() q (a(b)c()(d(e(f)g))h) q'; ;; our $r3; $r3 = qr{ \( (?: [^()]+ | (??{ $r3 }) )* \) }xms; ;; my @p = $s =~ m{ $r3 }xmsg; print qq{'$_'} for @p; print '--------'; ;; $s =~ m{ ($r3) [^()]* ($r3) }xms; print qq{1 '$1' 2 '$2'}; print '--------'; " '(y)' '(a(b))' '()' '()' '(a(b)c()(d(e(f)g))h)' -------- 1 '(y)' 2 '(a(b))' --------

And the OPed:

our $r3 = qr{ ... (??{ our $r3 }) ... }xms;

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://1044042]
[erix]: I probably also need to understand TAP a bit better than I do
[Corion]: Discipulus: Hahaha ;)

How do I use this? | Other CB clients
Other Users?
Others studying the Monastery: (9)
As of 2017-03-23 08:33 GMT
Find Nodes?
    Voting Booth?
    Should Pluto Get Its Planethood Back?

    Results (285 votes). Check out past polls.