Question

我有以下代码：

declare
  l_input      clob;
  l_output     clob;
  function check_this_regex(
    io_str    in out clob
    ,o_found  out clob
  ) return boolean
  is
    l_match   clob;
  begin
    dbms_output.put_line('Matching against ->' || io_str || '<-');
    l_match := regexp_substr(io_str, '"((y)*)"');

    if l_match is null then
      return false;
    end if;

    o_found := l_match;
    return true;
  end;
begin
  l_input := to_clob('x');
  dbms_output.put_line('l_input->' || l_input || '<-');
  if (check_this_regex(l_input, l_output)) then
     dbms_output.put_line('Found: ' || l_output);
  else
     dbms_output.put_line('Not found');
  end if;
end;

为什么输出Found？

Answer 1

问题应该是针对NULL检查clob;以这种方式编辑支票

if l_match /* is null */ = empty_clob() then

给出：

l_input->x<-
Matching against ->x<-
Not found

Answer 2

对于clob alwas的regexp_substr返回非null值。检查示例。

declare 
 v_clob clob;
 v_in clob :='a';

 v_str varchar2(10);
 v_st_in  varchar2(10) :='a';
begin 
 v_clob := regexp_substr(v_in,'xx');
 if v_clob is null then
  dbms_output.put_line('aaa');
 end if;
 v_str := regexp_substr(v_st_in,'xx');
 if v_str is null then
  dbms_output.put_line('aaa');
 end if;
end;

PL / SQL正则表达式不起作用

2 个答案: