На этом шаге мы познакомимся с операторами ветвления.
В языке Perl для организации ветвления в программе предусмотрены операторы if, которые и называются операторами ветвления. Эти операторы вычисляют выражение, называемое условием, и в зависимости от его истинности или ложности выполняют или не выполняют некоторый блок операторов. Иногда приходится делать выбор на основе проверки нескольких различных условий. Для подобных цепочек ветвлений существует специальная форма оператора if, реализующая множественные проверки.
В языке существуют три формы оператора ветвления if:
if (<ВЫРАЖЕНИЕ>) <БЛОК> if (<ВЫРАЖЕНИЕ>) <БЛОК1> else <БЛОК2> if (<ВЫРАЖЕНИЕ1>) <БЛОК1> elsif (<ВЫРАЖЕНИЕ2>) <БЛОК2> … else <БЛОКn>
Следует обратить внимание на тот факт, что все они определяются в терминах блоков операторов, заключенных в фигурные скобки, поэтому даже если в блоке содержится один оператор, он должен быть заключён в фигурные скобки. Такой синтаксис составных операторов Perl может оказаться не совсем привычным для программистов на языке С, в котором фигурные скобки в случае одного оператора в блоке не обязательны.
Приведем пример использования третьей формы оператора ветвления:
$var=<STDIN>; # Ввод значения переменной с клавиатуры. if ( $var < 0) { # ВЫРАЖЕНИЕ1 print “Переменная отрицательна”; # БЛОК1 } elsif ( $var ==0) { # ВЫРАЖЕНИЕ2 print “Переменная равна нулю”; # БЛОК2 } else { print “Переменная положительна”; # БЛОК3 }
На следующем шаге мы приступим к изучению циклических конструкций.
