regex - 在变量值“52/80”中搜索子字符串“52”在 TCL 中不起作用

Question

我正在使用的代码：

set channel 52/80   
if {![ regexp { ([0-9]+)\/80 } $channel match cchannel ] } {
        puts "Channel regex-ed in \[SLVR\]\[SetAffected_channels\] is: $cchannel\n\n"
}

返回错误：无法读取“cchannel”：没有这样的变量

我在这里缺少什么吗？

Answer 1

由于多余的空格，您的代码不匹配。

% set channel 52/80   
52/80
% regexp { ([0-9]+)\/80 } $channel match cchannel
0
% regexp {([0-9]+)\/80} $channel match cchannel
1
% set match
52/80
% set cchannel
52

regexp在这种情况下，您也不应该反转结果；if正文脚本似乎适用于模式匹配时...