#!/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";