Perlにbool型なんてないんや

Perlにはbool型が存在しないそうな。
ここらへんはPerlのハマりどころですね。




#####実際にやってみる <pre class='brush: perl'> use 5.010; my $flg = false; if (!$flg) { say 'flgはfalseです'; } </pre> このコードを実行すると何が出力されるでしょうか？ <br> 答えは何も出力されません。 <br> 他の言語(PHP・JSなど)に慣れている方からすれば 'flgはfalseです' と出力されると思ったはずです。 Perlにはbool型が無いため、$flgのfalseが文字列のfalseと解釈されます。 シングルクォーテーションで囲ってないのに文字列と認識するPerlの特徴です。 <br> 知らない人からすればハマっちゃうよね(´・ω・｀) というか知っていてもうっかりやっちゃうなんてこともあるはず。 <br> 回避策はあります。 <a href="http://hamuhamuengineer.blogspot.jp/2014/06/perl.html">はじめてPerlやってみた</a>でも書きましたが use strict を記述しておけばエラーを出力してくれます。 strictをクセづけておけば大丈夫。 <br> #####Perlの真と偽をまとめてみた Perlの条件式で真と評価されるものと偽と評価されるものとでまとめてみた ####真 * 空文字又は'0'以外の文字列 * 0以外の数値 <br> ####偽 * 空文字又は'0'の文字 * 0の数値 * undef(未定義の変数) <br> こんなところでしょうか？漏れがあったら教えて下さい。

初めてのPerl 第6版 新品価格 ￥3,888から (2014/6/2 02:27時点)

Perl徹底攻略 (WEB DB PRESS plus) 新品価格 ￥2,354から (2014/6/2 02:28時点)

続・初めてのPerl 改訂第2版 新品価格 ￥3,888から (2014/6/2 02:28時点)