真/偽のブール値がPerlに組み込まれていますか？

Question

可能性の重複：
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

警告を使用し、特に 1を上ライナー。

Perlには、trueまたはfalseの名前付き定数はありません。警告または厳密に有効化されていないと、定数または関数ではあるが、そうでないものは静かに文字列として解釈されます。したがって、if("true")とif("false")を実行しており、""または"0"以外のすべての文字列はtrueです。

Answer 2

あなたは厳しいとそれを実行すると：常に真である文字列"true"または"false"として解釈され

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

：

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

あなたは理由になるだろう。定数はPerlで定義されていないが、あなたはそれを自分で行うことができます。

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

Answer 3

あなたは裸の単語trueとfalseを使用しています。裸の言葉は悪いことです。あなたはこれをしようとした場合：

Bareword "true" not allowed while "strict subs" in use at - line 3. 
Execution of - aborted due to compilation errors. 

どれ定義された値が0のように見えない「真」とみなされます。

use strict; 
use warnings; 
if (true){print 1} 

あなたは、おそらくこのような何かを得るでしょう。未定義の値または0（たとえば0または"0"など）のような値は、すべて「false」と見なされます。これらの値には組み込みのキーワードはありません。あなただけの0と1を使用する（または、それは本当にあなたを悩ます場合use constant { true => 1, false => 0};に固執することができます。:)