Perl中的布尔值
Perl 目前没有具体的布尔类型,但在Perl的文档中,你经常会看到某函数返回一个"布尔"值,有时文档中会写“函数返回true或者false”.
那么,事实如何?
Perl没有具体的布尔类型, 但是每个标量 -- 如果使用if来检查,都会返回true 或 false之一. 所以你可以这么写:
if ($x eq "foo") { }
你也可以写:
if ($x) { }
前者会判断 $x 变量的内容是否与"foo"字符串相等,而后者则判断 $x 本身是 true 还是 false。
Perl中的哪些值是true和false?
这很简单, 引用文档:
数字0, 字符串'0' 及 '', 空列表"()", 以及 "undef"在布尔上下文中都是false, 其它值为true. 使用 "!" 或 "not" 否定一个真值,会返回一个特定的假值. 当作为字符串计算时,把它看成'', 但是作为数字时, 它是0.引用perlsyn文档的"Truth and Falsehood"一节.
所以,以下标量被认定为false:
- undef - 未定义值
- 0 数字0, 即便你写的是000或0.0
- '' 空字符串.
- '0' 包含单个0数字的字符串.
其它所有的标量(包括下面的)是true:
- 1 任何非0数字
- ' ' 有一个空格的字符串
- '00' 两个及以上'0'字符的字符串
- "0\n" 0及后面跟有一个换行符
- 'true'
- 'false' 没错, 即便是字符串'false'也被认定为是true.
我想这大概是因为Perl的创始人 Larry Wall 有着一个积极的世界观. 他可能认为, 世上坏的和假的事情是很少的, 大多数事情都是真的.
Published on 2013-04-21
If you have any comments or questions, feel free to post them on the source of this page in GitHub. Source on GitHub.
Comment on this post