Nothing so neat, but in Java you would use String.replaceAll () or use Pattern to do something like:
Pattern p = Pattern.compile("(\bi'?\b)"); Matcher m = p.matcher(stringToReplace); m.replaceAll("$1");
Check the template documents for the regex Java syntax - it does not completely overlap with Perl.
To get uppercase, select Matcher.appendReplacement :
StringBuffer sb = new StringBuffer(); while (m.find()) { String uppercaseGroup = m.group(1).toUpperCase(); m.appendReplacement(sb, uppercaseGroup); } m.appendTail();
Not as close to Perl as the jakarta-oro library, referenced above, but definitely some help built into the library.
Michael Brewer-Davis
source share