正則表達式regexp_substr解決where in list問題（讀書筆記之二）

--正則表達式regexp_substr解決where in list問題

VAR str VARCHAR2(100);
EXEC :str:='XY,YZ';
SELECT COUNT(*) FROM t1 WHERE object_name IN
(SELECT regexp_substr(:str,'[^,]+',1,LEVEL)AS value_str FROM dual 
CONNECT BY LEVEL <= LENGTH(TRIM(TRANSLATE(:str,TRANSLATE(:str,',',' '),' ')))+1);

/*'^' 匹配輸入字符串的開始位置，在方括號表達式中使用，此時它表示不接受該字符集合。
'+' 匹配前面的子表達式一次或多次
所以regexp_substr(:str,'[^,]+',1,LEVEL)表示從字符串:str中的第一個字母一直到第level個字母，按逗號截取，
得到的結果賦給value_str*/