Perl中的真与假深入研究

Perl对于真假的判断，核心观点就一句话：真值是自明的。怎么理解呢？Perl认为，一个东西的真假，天生就写在它自己的属性里，不需要额外计算。而且Perl天生乐观——在它的世界观里，真的东西远比假的东西多得多。

这就不得不说说Perl的出身了。Perl是语言学家创造的，而语言学里，意思全靠上下文。所以Perl中的真值判断，全部在标量语境下完成——你可以把标量理解成英语里的单数，比如book和books的区别，真值在现实世界里是个单数概念，所以自然归标量管。除此之外，Perl不会自作主张帮你做类型强制转换（不像Python里int('42')那种操作，也不像Ja va里(int)'d'那种转换）。

不同类型的值，判定的标准是什么？规则其实很简单：

• 字符型：除了空字符串""和字符串"0"，所有字符都是真
• 数字型：除了0，所有数字都是真
• 引用型：所有引用都为真——所有引用都指向一个有地址的对象，这绝不可能是0，因为它已经定义好了
• 未定义：所有未定义值都是假

光说规则可能有点抽象，来点实际的例子，看完你就明白了：

说白了，Perl判断真假的原则非常实用主义：只要不是明确表示“没有”或“零”，它就认为你是真的。这种设计哲学，让代码写起来格外顺手。真值的判断规则简单清晰，一旦记住，基本不会搞混。