Perl5Util.subsitute() and ${X} symbolic references in the substitution pattern

Brian Dantes <[email protected]> Fri, 04 Dec 2009 00:01:39 -0800
Newsgroups gmane.comp.jakarta.oro.user
Message-ID <C73E01E3.1DDFD%[email protected]>
In an actual Perl program, I can write a regex substitution like:

$x =~ s/abc(def)ghi(jkl)/${1}123${2}/;

This doesn't work with ORO. Instead I have to:

util.substitute("s/abc(def)ghi(jkl)/$1\\123$2/");

I am using ORO to read in legacy Perl regexes from an external source, so
getting it to work with the symbolic references would be best.

Is there a way?

-BD