たPerl：32ビット以上

Question

そのうちの1つは2つの数値を、追加

Iは

my $hex_str = "fffff00000000"; 

my $hex_val = hex($hex_str); 

my $sum = $hex_val + 5; 

$sum私が期待されている場合 - 0xfffff00000005

Iは

my $hex_str = "ffffff00000000"; 

my $hex_val = hex($hex_str); 

my $sum = $hex_val + 5; 

コモド番組を持っている場合$sumが0xffffff00000008

もし私がhavv電子

my $hex_str = "fffffff00000000"; 

my $hex_val = hex($hex_str); 

my $sum = $hex_val + 5; 

コモドは$sumが0xfffffff00000000

であることを示して

Iは、第2及び第3のケースで予期しない値を取得し、なぜ誰かが私に説明できますか？

>perl -V:use64bitint 
use64bitint='define'; 

>perl -V:ivsize 
ivsize='8'; 

>perl -V:archname 
archname='MSWin32-x64-multi-thread'; 

Answer 1

$ sumの印刷に使用するコードは表示されません。問題がどこにあるのかもしれないが、私はそれを複製することはできない。いずれにしても、警告を有効にしている場合、hex（）の呼び出しによって警告がHexadecimal number > 0xffffffff non-portableに送られます。

あなたが行うことができ

：

use strict; 
use warnings; 
use Math::BigInt; 

my $hex_str = "ffffff00000000"; 
my $hex_val = Math::BigInt->new("0x$hex_str"); 
my $sum = $hex_val + 5; 
print $sum->as_hex, "\n"; 

Answer 2

コモド（IDEを使用）、または何それはperlとデータを交換するために使用していますが、その結果、64ビットの値を格納する倍精度浮動小数点を使用していることが表示されます精度の低下で窓を見て子どもからsprintf "%X", $sumを使用するときにはPerlの中からprintf "%X\n", $sum;を使用した場合、または

これは$sumのために間違った値を表示するウォッチウィンドウを起こしますが、正しい値を示しています。