perl - パック/アンパック-リトルエンディアン-64ビット-質問

Question

#!/usr/bin/env perl
use warnings;
use 5.012;

my $var = 1 << 31;
say unpack( "B*", pack( "N", $var )  );

# 10000000000000000000000000000000

パック/アンパックを使用するにはどうすればよいですか？

my $var = 1 << 63;

このような出力？

# 1000000000000000000000000000000000000000000000000000000000000000

Answer 1

say unpack("B*", pack( "Q>", $var ));

（符号なし64ビット「クワッド」）タイプ>でビッグエンディアンのバイトオーダーを強制します。Q