Re^3: Evaluating code in a regex at runtime: (??{...})

in reply to Re^2: Evaluating code in a regex at runtime: (??{...})
in thread Evaluating code in a regex at runtime: (??{...})

Yes, you’re right. So in dave_the_m’s example, all we need to do is add another set of parentheses:

/(....)...(...)...((??{foo()}))....(...)/
 ^        ^       ^                ^
 1        2       3                4
[download]

and the dynamically generated capture group is assigned to $3. For example:

use Modern::Perl;

my $str  = 'abcd$$$$$ef';
my @caps = $str =~ /(a)b(c)d((??{'(.)' x 5}))e(f)/;

say join(', ', @caps);
[download]

Output:

18:33 >perl 504_SoPW.pl
a, c, $$$$$, f

18:38 >
[download]

What we (apparently) can’t get is multiple ~~capture groups~~ matches assigned to different capture groups (whether named or unnamed) from the same dynamic match. Correct?

Athanasius <°(((>< contra mundum Iustus alius egestas vitae, eros Piratica,

Comment on Re^3: Evaluating code in a regex at runtime: (??{...}) Select or Download Code

Replies are listed 'Best First'.
Re^4: Evaluating code in a regex at runtime: (??{...}) by LanX (Saint) on Jan 28, 2013 at 09:09 UTC
> What we (apparently) can’t get is multiple capture groups assigned to different capture groups (whether named or unnamed) from the same dynamic match. Correct? apparently yes, like documented: `DB<131> 'aaa' =~ /(?<outer>(??{'(?<inner>.)' x 1}))/; keys %+ => "outer"` [download] But of course there are workarounds ... if necessary. Cheers Rolf	[reply] [d/l]

In Section Seekers of Perl Wisdom