perl - Perl 中是否有内置的 true/false bool 值？

Question

这个问题在这里已经有了答案:




10年前关闭。

Possible Duplicate:
How do I use boolean variables in Perl?

[root@ ~]$ perl -e 'if(true){print 1}'
1
[root@ ~]$ perl -e 'if(false){print 1}'
1

我都惊呆了 true和 false通过 if ...

Answer 1

如果你严格运行它:

perl -Mstrict -e 'if(true) { print 1 }'

你会得到原因:

Bareword "true" not allowed while "strict subs" in use at -e line 1.

它被解释为字符串 "true"或 "false"这总是正确的。 Perl 中未定义常量，但您可以自己定义:

use constant { true => 1, false => 0 };
if(false) { print 1 }