REGEX 非捕获组正在与 TCL 捕获

Question

我有数据，见下文，我想在我的 TCL 脚本中使用 REGEXP 进行解析：

Mar 31 11:30:00 UTC+0100 2015
Mar 31 17:00:00 UTC+0100 2015
Mar 31 17:30:00 UTC+0100 2015
Apr 1 11:30:00 UTC+0100 2015
Apr 1 17:00:00 UTC+0100 2015
Apr 1 17:30:00 UTC+0100 2015
Apr 2 11:30:00 UTC+0100 2015

我想从上面的数据中提取一个月中的哪一天。 这是我到目前为止提出的正则表达式，我不知道为什么它不起作用。

(?:\w{3}\s)(\d{1,2})(?:\s)

我已经在 RegExr 网站上使用我的示例数据对其进行了测试，它似乎在那里正常工作；它返回组中的月份日期，但是当我在 TCL 脚本中运行它时，它返回所有匹配项，即返回非捕获组。

这里有什么我遗漏的吗？我不擅长正则表达式。

谢谢。

编辑：

以下是我的脚本中的代码示例。我有一个正在读取的 CSV 文件，其中 sData6 列包含上面的日期/时间信息。

while {[gets $fInputFile line] >= 0} {
    set aAllOptions [split $line ,]
    lassign $aAllOptions sData1 sData2 sData3 sData4 sData5 sData6

    regexp -all {(?:\w{3}\s)(\d{1,2})(?:\s)} $sData6 regexData6

    puts "Printing regexp value $regexData6\n"

我的 puts 语句正在返回：

Mar 31 

我只想要它返回：

31

Answer 1

您使用的正则表达式工作正常，这只是我在 cmets 中所说的语法问题：

regexp -all {(?:\w{3}\s)(\d{1,2})(?:\s)} $sData6 -> regexData6 
puts "Printing regexp value $regexData6\n"

语法是：

regexp ?switches? exp string ?matchVar? ?subMatchVar subMatchVar ...?

manpage

您使用的是matchVar，其中包含完整匹配项。 subMatchVar 包含第一个捕获的组，以及您需要的组。

我将matchVar 保存在-> 中（实际上任何变量名都可以在这里使用，因为我不需要它，所以我不需要有意义的东西）。

---

FWIW，您可以使用这个较短的正则表达式来实现相同的结果：

regexp -all {\w{3}\s(\d{1,2})\s} $sData6 -> regexData6