REGEXP_SUBSTR行变列

# REGEXP_SUBSTR行变列

```SQL
SELECT REGEXP_SUBSTR('A,B,C,D,E','[^,]+',1,LEVEL) AS STR FROM DUAL
CONNECT BY LEVEL <= REGEXP_COUNT('A,B,C,D,E','[^,]+');

ID    COL
1    A,B,C,D
2    AA,BB,CC,DD

WITH TEMP0 AS
 (SELECT LEVEL LV FROM DUAL CONNECT BY LEVEL <= 100)
    SELECT ID,REGEXP_SUBSTR (VALS,'[^,]+', 1,TV.LV)
  FROM (SELECT ID, col AS VALS,regexp_count(col,'[^,]+') AS CNT
                    FROM tt_split) T
    JOIN TEMP0 TV
        ON TV.LV <= T.CNT
 ORDER BY 1;

ORACLE中的支持正则表达式的函数主要有下面四个：
1，REGEXP_LIKE ：与LIKE的功能相似
2，REGEXP_INSTR ：与INSTR的功能相似
3，REGEXP_SUBSTR ：与SUBSTR的功能相似
4，REGEXP_REPLACE ：与REPLACE的功能相似
它们在用法上与Oracle SQL 函数LIKE、INSTR、SUBSTR 和REPLACE 用法相同，
但是它们使用POSIX 正则表达式代替了老的百分号（%）和通配符（_）字符。
POSIX 正则表达式由标准的元字符（metacharacters）所构成：
'^' 匹配输入字符串的开始位置，在方括号表达式中使用，此时它表示不接受该字符集合。
'$' 匹配输入字符串的结尾位置。如果设置了 RegExp 对象的 Multiline 属性，则 $ 也匹
配 '\n' 或 '\r'。
'.' 匹配除换行符之外的任何单字符。
'?' 匹配前面的子表达式零次或一次。
'+' 匹配前面的子表达式一次或多次。
'*' 匹配前面的子表达式零次或多次。
'|' 指明两项之间的一个选择。例子'^([a-z]+|[0-9]+)$'表示所有小写字母或数字组合成的
字符串。
'( )' 标记一个子表达式的开始和结束位置。
'[]' 标记一个中括号表达式。
'{m,n}' 一个精确地出现次数范围，m=<出现次数<=n，'{m}'表示出现m次，'{m,}'表示至少
出现m次。
\num 匹配 num，其中 num 是一个正整数。对所获取的匹配的引用。
字符簇： 
[[:alpha:]] 任何字母。
[[:digit:]] 任何数字。
[[:alnum:]] 任何字母和数字。
[[:space:]] 任何空白字符。
[[:upper:]] 任何大写字母。
[[:lower:]] 任何小写字母。
[[:punct:]] 任何标点符号。
[[:xdigit:]] 任何16进制的数字，相当于[0-9a-fA-F]。

DECLARE
  V_CHAR VARCHAR2(4000) := 'A,B,C';
  V_TAG VARCHAR2(10) := ',';
  TT SYS_REFCURSOR;
  REC SPLIT%ROWTYPE;
BEGIN
  OPEN TT FOR '
  SELECT REGEXP_SUBSTR ('''||V_CHAR||''', ''[^'||V_TAG||']+'', 1,rownum) AS COL FROM DUAL
  CONNECT BY ROWNUM <= REGEXP_COUNT ('''||V_CHAR||''', ''[^'||V_TAG||']+'')';

LOOP
    FETCH TT INTO REC;
    EXIT WHEN TT%NOTFOUND;
    DBMS_OUTPUT.PUT_LINE(REC.COL);
  END LOOP;
  CLOSE TT;
END;
```