请考虑以下代码段:
use strict; use warnings; my $data = "1"; my $packed = pack("I",$data); open(my $file,">","test.bin") || die "error $!\n"; binmode $file; print $file $packed;
问题是,试图从另一种语言中读取它,这似乎是小端.是否有任何模板参数允许我将其写为大端?我想在阅读时避免做额外的工作.
解决方法
考虑使用带有包的“N”模板: