with base_data as (

    select '1,2,3' v from dual

)

, temp as (

 select regexp_substr(t1.v, '[^,]+', 1, level) v

   from base_data t1

connect by level <= length(regexp_replace(t1.v, '[^,]+', ''))+1

)

select substr(sys_connect_by_path(v, '-'), 2) as path

  from temp x

 where level = 3

connect by nocycle prior x.v <> x.v

SELECT SUBSTR(SYS_CONNECT_BY_PATH(v, ','), 2) p
  FROM (SELECT REGEXP_SUBSTR(v, '[^,]+', 1, LEVEL) v
          FROM base_data
         CONNECT BY LEVEL <= REGEXP_COUNT(v, ',') + 1
        )
 WHERE CONNECT_BY_ISLEAF = 1
 CONNECT BY NOCYCLE PRIOR v != v
;

 훌륭하십니다.

nocycle을 그렇게 사용할 수 있네요...

다음은 제가 생각한 답입니다.

with base_data as 

(

    select '1,2,3' v from dual

)

, base_calc as

(

    select 

        ','||a.v v

        , length(','||a.v) - length(replace(','||a.v,',','') ) len

    from    base_data a

)

, base_recur ( v , len , tar, tarlen,pos ) as

(

    select

        a.v

        ,a.len

        ,substr( a.v , 1 ,nvl(nullif(instr( a.v , ',' , 1,2 ),0),length(a.v)+1) - 1  ) tar

        , 2 tarlen

        , 2 pos

    from    base_calc a

    union all

    select

        a.v

        ,a.len

        ,substr(a.tar,1, nvl(nullif(instr(a.tar,',',1,b.column_value),0),length(a.tar)+1) - 1)||substr(a.v,instr(a.v,',',1,a.pos) , nvl(nullif(instr(a.v,',',1,a.pos+1),0),length(a.v)+1) - instr(a.v,',',1,a.pos) )||substr(a.tar,nvl(nullif(instr(a.tar,',',1,b.column_value),0),length(a.tar) + 1))

        ,a.tarlen + 1

        ,a.pos + 1

    from    base_recur a

            , TABLE(select collect(level) from dual connect by level<= a.tarlen) b 

    where   a.pos <= a.len

)

select

    substr(a.tar,2) tar

from    base_recur a

where   a.len + 1 = a.pos

/

부분 순열에 각 각 위치로 새 원소를 삽입하는 방법으로 재귀호출하는 형태로 구현했습니다.

그런데 두 분의 방법이 훨씬 깔끔하네요...

그러면 또 다음 문제를 풀어보시기 바랍니다.

아.. 조건으로는 connect_by_isleaf 으로 체크하는게 맞겠네요.

마농님 답변 항상 잘보고 있습니다. ^^

흥수님 퀴즈 감사합니다~