Оператор Perl UNLESS
Оператор unless состоит из логического выражения, за которым следует одна или несколько инструкций.
Синтаксис
Формат синтаксиса следующий:
unless(boolean_expression){
# 在布尔表达式 boolean_expression 为 false 执行
}
Если логическое выражение boolean_expression ложно, блок кода внутри оператора if будет выполнен. Если логическое выражение истинно, первый блок кода после завершения оператора if (после закрывающей фигурной скобки) будет выполнен.
Блок-схема

Пример
#!/usr/bin/perl
$a = 20;
# Использование оператора unless для проверки логического выражения
unless( $a < 20 ){
# Выполняется, когда логическое выражение ложно
printf "a больше или равно 20\n";
}
print "Значение a:$a\n";
$a = "";
# Используйте оператор unless для проверки логического выражения
unless ( $a ){
# Выполняется, когда логическое выражение ложно
printf "Условие a ложно\n";
}
print "Значение a:$a\n";
После выполнения вышеуказанной программы результат вывода:
a 大于等于 20 a 的值为 : 20 条件 a 为 false a 的值为 :Другие расширения
Условные операторы Perl