Tcl - 匹配glob模式中的右括号

Question

如何获得switch语句来计算右括号？我想这两个"[][]"和"[[\]]"

set x "]" 

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

Answer 1

当你想匹配]为一组的一部分switch中的字符，你只有几个选择：

1. 使用-regexp而不是-glob。它更复杂，需要不同的模式，但它也更加灵活（尤其是当涉及到这样的事情时）。

   switch -regexp $x { 
       ^[][(){}]$ { 
        puts "Matched!" 
       } 
   } 
   

2. 使用多个条款与身体交流：

   switch -glob $x { 
       {\[} - {\]} - [(){}] { 
        puts "Matched!" 
       } 
   } 
   

你无法做的是在设定除的非初始部分水珠比赛放在什么]一个范围（glob匹配器非常笨，但很快）。没有任何合适的范围与您在此之后的内容完全匹配，因此单个glob将无法工作。

Answer 2

你可以使用：

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

或匹配比支架更多：

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