ORACLE实现java的split函数

create or replace type strsplit_type as object (str_split varchar2(64));
create or replace type strsplit_tab IS table of strsplit_type;

create or replace function strsplit(p_value varchar2, p_split varchar2 ) return strsplit_tab pipelined
  is
    v_idx integer;
    v_str strsplit_type;
    v_strs_last varchar2(4000) := p_value;
begin
    loop
        v_idx := instr(v_strs_last, p_split);
        exit when v_idx = 0;
        v_str := substr(v_strs_last, 1, v_idx - 1);
        v_strs_last := substr(v_strs_last, v_idx + 1);
        pipe row(v_str);
    end loop;
    pipe row(v_strs_last);
    return;
end strsplit;