with input(a,b) as (
select 'farelka', 'butelka' from dual
)
select strt, len, substr(b,strt,len) lcs
from input i,
lateral(select length(i.b) + 1 - level len from dual connect by length(i.b) + 1- level >0) s,
lateral(select level strt from dual connect by level + s.len -1 <= length(i.b))
where instr(a, substr(b,strt,len))>0