2007-05-08 ビット演算時の注意 perl Perlでのbit演算をしようとしているときに、変数がどうしても文字列扱いされてしまい非常に苦労したが、hex()を使えば、確実に数値として扱われる。 print 0xFF ^ CB; 255 print 0xFF ^ pack("H*",CB); 255 $a="CB"; print 0xFF ^ pack("H*",$a); 255 print 0xFF ^ hex(CB); 52 $a="CB"; print 0xFF ^ hex($a); 52