从字符串中删除特定的单词

Question

我正在使用oracle10g。

我想删除句子中所有出现的特定单词，但是我不想删除包含z或AZ之间其他字符的任何其他单词。

例如 ，以下是我要删除的句子some：

some text, 123 someone, another text some1

预期产量 ：

 text, 123 someone, another text

请注意，some如果该单词包含some+A-Z和a-z之前或之后的任何其他单词，我也想删除它some。

到目前为止，这是我尝试过的：

select replace('some text, 123 someone, another text some1','some','') 
from dual;

我正在输出：

 text, 123 one, another text 1

在上面的输出中，我期望someone不被替换，some1应该完全替换。

我应该如何实现呢？任何建议将不胜感激。

编辑： 为清楚起见，这是我正在寻找的另一个示例：

some other text someone other text, someB some1 some.

输出应为：

 other text someone other text, someB

从上面这句话someB是不是删除，因为它具有之间的字符a-z
并some1和some.被删除becasue它不具有字符之间a-z。

编辑2

如果我使用正则表达式：

select REGEXP_REPLACE('some text, 123 someone, another text some1','[^a-zA-Z]','')
from dual

我正在输出：

sometextsomeoneanothertextsome

预期产量：

sometextsomeoneanothertext

请注意，我some1还希望从字符串中删除它，因为它包含的字符不是A-Z。

使用regex的答案也将受到赞赏。

Answer 1

由于在正则表达式的Oracle实现中缺少对lookbehind / lookahead和word boundary（\b）的支持，因此似乎不可能在单个REGEXP_REPLACE调用中满足所有要求。特别是针对这种情况，Egor
Skriptunoff指出
：模式匹配，然后是一个接一个的，它们之间只有一个分隔符，例如some some some some ...。

如果没有这种情况，则可以通过此调用来匹配所有这样的字符串：

regexp_replace(
  source_string,                                       -- source string
  '([^[:alnum:]]|^)((\d)*some(\d)*)([^[:alnum:]]|$)',  -- pattern
  '\1\5',                                              -- leave separators in place
  1,                                                   -- start from beginning
  0,                                                   -- replace all occurences
  'im'                                                 -- case-insensitive and multiline 
);

图案部分：

(                -- start of Group #1
  [^[:alnum:]]   -- any non-alphanumeric character 
  |              -- or 
  ^              -- start of string or start of line 
)                -- end of Group #1
(                -- start of Group #2
  (              -- start of Group #3 
    \d           -- any digit
  )              -- end of Group #3
  *              -- include in previous group zero or more consecutive digits
  some           -- core string to match
  (              -- start of group #4
    \d           -- any digit
  )              -- end of group #4  
  *              -- include in previous group zero or more consecutive digits
)                -- end of Group #2
(                -- start of Group #5
  [^[:alnum:]]   -- any non-alphanumeric character 
  |              -- or
  $              -- end of string or end of line
)                -- end of Group #5

由于匹配模式中包含的用于匹配的分隔符（第1组和第5组）会在成功匹配时从源字符串中删除，因此我们需要通过在第三个regexp_replace参数中进行指定来恢复此部分。

基于此解决方案，可以替换循环中所有甚至重复的事件。

例如，您可以定义如下函数：

create or replace function delete_str_with_digits(
  pSourceString in varchar2, 
  pReplacePart  in varchar2  -- base string (like 'some' in question)
)
  return varchar2
is
  C_PATTERN_START constant varchar2(100) := '([^[:alnum:]]|^)((\d)*';
  C_PATTERN_END   constant varchar2(100) := '(\d)*)([^[:alnum:]]|$)';

  vPattern         varchar2(4000);
  vCurValue        varchar2(4000);
  vPatternPosition binary_integer;
begin

  vPattern := C_PATTERN_START || pReplacePart || C_PATTERN_END;
  vCurValue := pSourceString;

  vPatternPosition := regexp_instr(vCurValue, vPattern);

  while(vPatternPosition > 0) loop
    vCurValue := regexp_replace(vCurValue, vPattern,'\1\5',1,0,'im');
    vPatternPosition := regexp_instr(vCurValue, vPattern);
  end loop;

  return vCurValue;

end;

并将其与SQL或其他PL / SQL代码一起使用：

SELECT 
  delete_str_with_digits(
    'some text, -> awesome <- 123 someone, 3some3
     line of 7 :> some some some some some some some <
222some  another some1? some22 text 0some000', 
    'some'
  )  as result_string
FROM 
  dual

SQLFiddle example