如何在 Perl 中获取 $foo 的十六进制表示形式？

Question

给定变量 $foo 包含二进制数据，如何在 Perl 中获取 $foo 的十六进制表示形式？

Answer 1

如果 $foo 是包含任意数据的字符串，请使用 unpack ：

my $hex = unpack('H*', $foo);

如果只是一个整数，请使用 sprintf：

my $hex = sprintf('%x', $foo); # Or %X if you want upper-case letters

Answer 2

$ perldoc -f hex
…
To present something as hex,
look into "printf", "sprintf", or "unpack".

==>

$hex = sprintf("%x", $foo);