如何在Perl中打印4位十六进制值?

qzlgjiam  于 2022-11-15  发布在  Perl
关注(0)|答案(1)|浏览(356)
my $hex = sprintf('%X', oct("0b$reverse_str"));
print FOUT "HEX FORMAT: $hex\n";

如果十六进制值是007E,它只打印7E。如何在Perl中打印4位十六进制值?

相关问题