perl语言Boolean 值

river

在if 控制结构的条件判断部分可以使用任意的标量值。这在某些时候将很方便，如：
$is_bigger = $name gt‘fred’;
if($is_bigger){… }
那么，Perl 是怎么判断其值得true 或false 呢？Perl 不同于其它的一些语言，它没有Boolean 类型。它利用如下几条规则◆：
◆事实上Perl 不是用的这些规则，但你可以利用它们方便记忆，其结果是一致的。
● 如果值为数字，0 是false；其余为真
● 如果值为字符串，则空串(‘’)为false；其余为真
● 如果值的类型既不是数字又不是字符串，则将其转换为数字或字符串后再利用上述规则◆。
◆这意味着undef（很快会看到）为false。所有的引用（在Alpaca 书中有详细讨论）都是true。
这些规则中有一个特殊的地方。由于字符串‘0’和数字0 有相同的标量值，Perl 将它们相同看待。也就是说字符串‘0’是唯一
一个非空但值为0 的串。
如果想得到相反的值，可以使用一元非运算符! 。如果其后面的是true，则得到false；反之，则得到true：
if(! $if_bigger){
#当$if_bigger 非真时，运行此代码
}