package ru.rdtex.tools.regexp;

import org.apache.oro.text.perl.Perl5Util;

public class Oro
{

private static final Perl5Util util = new Perl5Util();

public Oro()
{
}

public static String substitute(String expression, String input)
{
return util.substitute(expression != null ? expression : "s///", input != null ? input : "");
}

public static String extract(String expression, String input, int group)
{
if(util.match(expression != null ? expression : "//", input != null ? input : ""))
{
if(util.groups() > group)
return util.group(group);
else
return null;
} else
{
return null;
}
}

}
CREATE OR REPLACE PACKAGE regexp_oro AUTHID CURRENT_USER AS FUNCTION substitute(expression IN VARCHAR2, input IN VARCHAR2) RETURN VARCHAR2; FUNCTION extract(expression IN VARCHAR2, input IN VARCHAR2, group_no IN NUMBER) RETURN VARCHAR2; END regexp_oro;
/

CREATE OR REPLACE PACKAGE BODY regexp_oro AS FUNCTION substitute(expression IN VARCHAR2, input IN VARCHAR2) RETURN VARCHAR2 AS LANGUAGE JAVA NAME 'ru.rdtex.tools.regexp.Oro.substitute(java.lang.String, java.lang.String) return java.lang.String'; FUNCTION extract(expression IN VARCHAR2, input IN VARCHAR2, group_no IN NUMBER) RETURN VARCHAR2 AS LANGUAGE JAVA NAME 'ru.rdtex.tools.regexp.Oro.extract(java.lang.String, java.lang.String, int) return java.lang.String'; END regexp_oro;
/
+
jar проекта ORO c http://jakarta.apache.org/oro/index.html
_______________
Alex
There are three kinds of people: those who can count and those who can't

biomenСпасибо, но я видимо немного неправильно задал вопрос:)
Правильнее будет так: Можно ли обновить JDK Oracle?Нет