Perl UNLESS 语句
最后更新于:2022-03-27 02:00:55
Perl UNLESS 语句
一个 unless 语句由一个布尔表达式后跟一个或多个语句组成。
语法
语法格式如下所示:
unless(boolean_expression){ # 在布尔表达式 boolean_expression 为 false 执行 }
如果布尔表达式 boolean_expression为 false,则 if 语句内的代码块将被执行。如果布尔表达式为 true,则 if 语句结束后的第一组代码(闭括号后)将被执行。
流程图
实例
#!/usr/bin/perl
$a = 20;
# 使用 unless 语句检测布尔表达式
unless( $a < 20 ){
# 布尔表达式为 false 时执行
printf "a 大于等于 20\n";
}
print "a 的值为 : $a\n"; $a = "";
# 使用 unless 语句检测布尔表达式
unless ( $a ){
# 布尔表达式为 false 时执行
printf "条件 a 为 false\n";
}
print "a 的值为 : $a\n";
# 使用 unless 语句检测布尔表达式
unless( $a < 20 ){
# 布尔表达式为 false 时执行
printf "a 大于等于 20\n";
}
print "a 的值为 : $a\n"; $a = "";
# 使用 unless 语句检测布尔表达式
unless ( $a ){
# 布尔表达式为 false 时执行
printf "条件 a 为 false\n";
}
print "a 的值为 : $a\n";
执行以上程序,输出结果为:
a 大于等于 20 a 的值为 : 20 条件 a 为 false a 的值为 :