Perl UNLESS...ELSE 语句
Perl 条件语句一个 unless 语句 后可跟一个可选的 else 语句，else 语句在布尔表达式为 true 时执行。
语法
语法格式如下所示：
unless(boolean_expression){
# 在布尔表达式 boolean_expression 为 false 执行
}else{
# 在布尔表达式 boolean_expression 为 true 执行
}如果布尔表达式 boolean_expression 为 false，则执行 unless 块内的代码。如果布尔表达式为 true，则执行 else 块内的代码。
流程图
实例
#!/usr/bin/perl
$a = 100;
# 使用 unless 语句检测布尔表达式
unless( $a == 20 ){
# 布尔表达式为 false 时执行
printf "给定的条件为 false\n";
}else{
# 布尔表达式为 true 时执行
printf "给定的条件为 true\n";
}
print "a 的值为 : $a\n";
$a = "";
# 使用 unless 语句检测布尔表达式
unless( $a ){
# 布尔表达式为 false 时执行
printf "a 给定的条件为 false\n";
}else{
# 布尔表达式为 true 时执行
printf "a 给定的条件为 true\n";
}
print "a 的值为 : $a\n";执行以上程序，输出结果为：
给定的条件为 false a 的值为 : 100 a 给定的条件为 false a 的值为 :