Оператор if/unless.
if(выражение) { op_1; op_2; op_3; } else { op_1; op_2; op_3; }
Управляющее выражение вычисляется как строковая величина в скалярном контексте (если это уже строка, то ничего не изменится, если это число, то оно преобразуется в строку). Если строка пуста, либо состоит из одного символа "0", то значение выражения - ложь. Все остальное - "истина".
Пример:
print "how old are you? "; $a = <STDIN> ; chomp($a); if($a < 18) { print "So, you're not old enougt to vote, eh?\n"; } else { print "Old enough! Cool! So go vote!\n"; $voter++; }
Оператор unless:
print "how old are you? "; $a = <STDIN> ; chomp($a); unless($a < 18) { print "Old enough! Cool! So go vote!\n"; $voter++; }
if(выражение) { op_1; op_2; op_3; } elsif(выражение 2) { op_1; op_2; op_3; } else { op_1; op_2; op_3; }