regex - Perl 正则表达式条件匹配

Question

什么可以是匹配以下任何一个的可能的正则表达式:

Eggs and Legs

Legs and Eggs

我只能想到以下正则表达式:

(Eggs|Legs) and (Eggs|Legs)

但我想避免匹配:

Eggs and Eggs

Legs and Legs

PS:编辑我的解决方案以添加括号，

Answer 1

使用捕获组和否定前瞻:

/(Eggs|Legs) and (?!\1)(?:Eggs|Legs)/

即第一个和最后一个词可以是 Eggs 或 Legs，但是 capture第一个词(使用 (...))，然后确保 and 后面没有跟那个词(使用 negative lookahead ((?! ...)) 无论第一个单词是 (\1)).

查看实际效果 here .