Почему эта ошибка метания неверная

Question

Когда я использую только 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{}
}

Answer 1

Похоже, вы используете модуль Switch .Было время, когда это было включено в стандартный дистрибутив Perl (с 5.8 до 5.10), но это фильтр исходных текстов, который можно сказать коротко: «это делает невероятно сложные вещи для анализа вашего кода Perl и почти гарантированно сломается».трудно найти пути в какой-то момент ".

Пожалуйста, не используйте его.

Но если вы настаиваете на его использовании, то замените default на else.