Perl移位问题

前端之家收集整理的这篇文章主要介绍了Perl移位问题前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
尝试使用Perl将位移位为负数时,我遇到了问题.
例如:

printf("%d",(-10) >> 2);

方法打印:1073741821

在相同条件下,当我尝试使用Javascript时:

document.write('test: ' + (-10 >> 2) + '<br>');

输出为-3

我想了解Perl和Javascripts之间的区别. Perl是否存在将位移位为负数的问题?

非常感谢你.

解决方法

Perl使用无符号二进制右移.如果Perl在32位体系结构上运行,则会得到以下结果:

-10 == -0xa == 0xfffffff6
0xfffffff6 >> 2 == 0x3ffffffd == 1073741821

无符号二进制右移意味着结果的最高(最严格)位变为0.

JavaScript使用符号扩展二进制右移. JavaScript移位始终将输入和输出视为32位整数.所以你得到:

-10 == -0xa == 0xfffffff6
-3 == -0x3 == 0xfffffffd
0xfffffff6 >> 2 == 0xfffffffd == -3

符号扩展二进制右移意味着结果的最高(最严格)位从原始值的最高位复制.

正如Tim Henigan在他的回答中所说,通过指定use integer,可以从Perl获得符号扩展二进制右移.例:

{ use integer;
  printf "%d 0x%x\n",(-10) >> 2,(-10) >> 2;  #: -3 0xfffffffd
}
printf "%d 0x%x\n",(-10) >> 2;  #: 1073741821 0x3ffffffd

猜你在找的Perl相关文章