как обрабатывают отсутствие case

[Timofey]

в части языков программирование есть такой оператор условия case (что-то типа if только когда известны все возможные значения переменной и надо их все обработать), в perl его нет. Я делаю просто много if,а как вообще правильнее будет обработать такую ситуацию в perl?

[Wyclef]

Код: [Выделить]

my $res = $var == 1 ? \'one\' :
          $var == 2 ? \'two\' :
          $var == 3 ? \'three\' :
          \'four\';
[OFF]Для конкретного случая может быть другое решение.[/OFF]

[arto]

perldoc Switch

[Wyclef]

Ну тогда уж perldoc -q switch...