当我仅使用6个情况时,开关正在工作,当我添加第7个情况时,它给出了错误
switch($A){
case 0 {do something}
case 1 {do something}
case 2 {do something}
case 3 {do something}
case 4 {do something}
case 5 {do something}
case 6 {do something}
default{}
}
看起来您正在使用开关模块。曾经有一段时间将其包含在标准Perl分布中(从5.8到5.10(,但这是一个源过滤器,这是说"这确实非常复杂的事情来解析您的Perl代码,并且几乎可以保证会破裂在某个时候难以找到的方式"。
请不要使用它。
但是,如果您坚持使用它,请用default
替换CC_1。