TCL-匹配球形格式的右括号

Question

我将如何得出switch算术结束语的陈述？我都尝试"[][]"和"[[\]]"

set x "]"

switch -glob $x {
    "[[\]]" {
        puts "MATCH ]"
    }
}

Answer 1

您可以使用：

set x "]";
switch -glob $x {
    \] {
        puts "MATCH ]"
    }
}

或比括号更匹配：

set x "foo]bar";
switch -glob $x {
    *\]* {
        puts "MATCH ]"
    }
}