Perl 将两个数字连接成另一个数字？

Question

我不想添加数字，而是“连接”它们并将值解释为单个数字。例如，

$var1 = 567;
$var2 = 1111;

#trying to explain what I wanna do with java-style syntax
$var3 = parseInt($var1 CONCAT $var2); 

print $var3; #5671111 and is of type integer

我该怎么做？谢谢

Answer 1

在 Perl 中，整数就是看起来像整数的东西。因此字符串连接可以给出一个整数。

my $var3 = $var1 . $var2;
print $var3 * 2, "\n";   # 11342222

因此，您可以强制 Perl 存储整数，因为 Java 会使用以下方法存储 int:

my $var3 = 0+( $var1 . $var2 );