Perl 长数据类型

Question

我正在用 Perl 编写一个应用程序，它需要长数据类型而不是整数。我怎样才能做到这一点。例如;

my $num = sprintf('%ld', 27823221234);

print $num;

输出不是长整型，而是整数。

Answer 1

您的选择是：

• 使用为 64 位编译的 Perl
• 使用 Math::Int64
• 使用 < a href="http://search.cpan.org/perldoc?Math::BigInt" rel="noreferrer">Math::BigInt

更新：
啊，你也可以使用浮点数代替整数：

printf("%.0f", 2**50)

IIRC，在大多数当前架构上，浮点数可以精确地表示高达 2**54-1 的整数。

Answer 2

在您的情况下 27823221234 实际上表示为 double，因此当您尝试输入 sprintf 时，您会收到 -1

my $x = 27823221234;

my $num = sprintf('%lf', $x);

print $num, "\n";

收益，

27823221234.000000

如果您想对大整数进行数学运算，请考虑使用 Math::Bigint 模块。

Answer 3

下面是一些代码，说明了 Perl 的一些行为方式 - 源自您的示例：

use strict;
use warnings;

my $num = sprintf("%ld", 27823221234);
print "$num\n";

my $val = 27823221234;
my $str = sprintf("%ld", $val);
printf "%d = %ld = %f = %s\n", $val, $val, $val, $val;
printf "%d = %ld = %f = %s\n", $str, $str, $str, $str;

使用 64 位 Perl，结果是：

27823221234
27823221234 = 27823221234 = 27823221234.000000 = 27823221234
27823221234 = 27823221234 = 27823221234.000000 = 27823221234

如果您确实需要大数字（数百位数字），那么请查看支持它们的模块。例如：

• Math::BigInt

Answer 4

你可能很困惑。 Perl 本身支持“长”大小的整数数学，但我不认为它的内部表示是你的问题所在。你期望你的输出是什么样的？