Perl условные операторы
Perl условный оператор выполняется одним или несколькими заявлениями результатов (истина или ложь), чтобы определить выполнение блока кода.
На приведенном ниже рисунке может быть простое понимание выполнения условного оператора:
Заметим , что число 0, строка '0', "", пустой список (), и UNDEFложно, другие значения являются истинными.Используйте переднийправда! Или невозвращает ложь.
Perl предоставляет раскрывающийся условный оператор:
Заявления | описание |
---|---|
Если логическое выражение последовало заявлениесо стороны одного или нескольких операторов. | |
Послезаявления , еслис дополнительнымдругое заявление,в противном случае выполняется оператор логическое выражение ложно. | |
Вы можете следовать дополнительнымELSIF заявление после того, еслизаявление, а затем следуют ещедругое заявление. | |
Если заявление не состоит из логического выражения следует один или более операторов. | |
Если не после того, как заявлениес дополнительнымзаявлением другое. | |
Если не после того, как заявлениес дополнительнымзаявлением ELSIF, азатем следуют ещедругое заявление. | |
В последней версии Perl, мы можем использовать операторкоммутатора.Он выполняет соответствующий блок кода в соответствии с другим значением. |
Троичный оператор ?:
Мы можем использоватьусловный оператор :? If ... Elseдля упрощения операций. Как правило, в формате:
Exp1 ? Exp2 : Exp3;
Если выражение EXP1 истинно, то выражение возвращает результаты exp2, в противном случае exp3.
Ниже показано:
#!/usr/local/bin/perl $name = "本教程"; $favorite = 10; # 喜欢数 $status = ($favorite > 60 )? "热门网站" : "不是热门网站"; print "$name - $status\n";
Вышеприведенная программа, выход:
本教程 - 不是热门网站