<?xml version="1.0" encoding="windows-1252"?>
<node id="1015637" title="Re^2: Evaluating code in a regex at runtime: (??{...})" created="2013-01-28 02:34:22" updated="2013-01-28 02:34:22">
<type id="11">
note</type>
<author id="708738">
LanX</author>
<data>
<field name="doctext">
&lt;I&gt;&amp;gt; Note that the contents of the match are still accessible via a named capture group:&lt;/I&gt;&lt;P&gt;&lt;P&gt;

&lt;I&gt;&amp;gt; ... &lt;c&gt; ('a' x 100) =~ /(?&lt;match&gt;(??{'(.)' x 100}))/; &lt;/c&gt;&lt;/I&gt;&lt;P&gt;&lt;P&gt;


ehm ... what you're  showing also works with &lt;I&gt;unnamed&lt;/I&gt; capture groups:&lt;P&gt;&lt;P&gt;

&lt;c&gt;
  DB&lt;113&gt; ('a' x 10) =~ /((??{'(.)' x 10}))/; print "&lt;$1&gt;"
 =&gt; 1
&lt;aaaaaaaaaa&gt;
&lt;/c&gt;&lt;P&gt;&lt;P&gt;

The OP's point was about dynamically generated capture groups, but  yours is outside the embedded Perl code.&lt;P&gt;&lt;P&gt;

&lt;!-- Node text goes above. Div tags should contain sig only --&gt;
&lt;div class="pmsig"&gt;&lt;div class="pmsig-708738"&gt;
&lt;p&gt;Cheers Rolf
&lt;/div&gt;&lt;/div&gt;</field>
<field name="root_node">
1015592</field>
<field name="parent_node">
1015619</field>
</data>
</node>
