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