regex - 在 TCL 中匹配正则表达式的问题

Question

我有以下模式

Notif[0]:
some text multiple line
Notif[1]:
multiple line text
Notif[2]:
text again
Notif[3]:
text again
Finish

我正在写正则表达式

set notifList [regexp -inline -all -nocase {Notif\[\d+\].*?(?=Notif|Finish)} $var]

它没有给出想要的输出

需要输出

I need a list with each `Notif`block

Answer 1

原因是您的 .*? 充当贪婪子模式(=.* 匹配 0+ 任何字符，包括换行符)因为第一个量词在模式是一个贪心模式(参见 \d+)。参见 this Tcl Regex reference :

A branch has the same preference as the first quantified atom in it which has a preference.

您只需将第一个 + 量化子模式转换为惰性子模式，方法是在其后添加 ?:

Notif\[\d+?\].*?(?=Notif|Finish)
          ^

这将防止 .*? 模式从 \d+ 继承贪婪。

参见 IDEONE demo