Легенда:
новое сообщение
закрытая нитка
новое сообщение
в закрытой нитке
старое сообщение
|
- Напоминаю, что масса вопросов по функционированию форума снимается после прочтения его описания.
- Новичкам также крайне полезно ознакомиться с данным документом.
 |  |
Спасибо ))) 13.03.05 22:24 Число просмотров: 1836
Автор: hotice Статус: Незарегистрированный пользователь
|
|
|
|
<programming>
|
как организовать switch() в Perl? Подскажите плз 11.03.05 22:14
Автор: hotice Статус: Незарегистрированный пользователь
|
|
|
 |
Много способов 12.03.05 02:09
Автор: Heller <Heller> Статус: Elderman
|
Во-первых, с помощью простых if'ов.
Во-вторых, можно создать хэш, в котором ключами будут являться то что обычно называется "case" (не знаю как это звучит по-русски), а соответственными значениями непосредственно код (или ператоры goto, или ссылки на подпрограммы - как удобнее) и потом требуюмую переменную можно сравнивать с ключами хэша, вызывая с помощью соответствующего значения требуемый код.
Третий способ мне кажется наиболее красивым:
SWITCH: {
/n1/ && do {
#код для $_=~/n1/
#...
#конец кода
last SWITCH;
};
/n2/ && do {
#код для $_=~/n2/
#...
#конец кода
last SWITCH;
};
#и т. д....
#а в самом конце, за
#пределами конкретных блоков
#(но внутри SWITCH) - код по умолчанию
#default, то бишь
}
---
Вот и всё, в общем-то.
|
 |  |
Спасибо ))) 13.03.05 22:24
Автор: hotice Статус: Незарегистрированный пользователь
|
|
|
|
|