Oracle处理指定分隔符中的字符串

DECLARE
V_LENGTH NUMBER;
V_TMP VARCHAR2(10);
V_STR VARCHAR2(20) := '12;6;2;5;3';
BEGIN
V_LENGTH := LENGTH(V_STR) - LENGTH(REPLACE(V_STR, ';', '')) + 1;
FOR i IN 1..V_LENGTH LOOP
SELECT REGEXP_SUBSTR(V_STR, '[^;]+', 1, i) INTO V_TMP FROM DUAL;
DBMS_OUTPUT.put_line(V_TMP);
END LOOP;
END;
/