string - 使用 Perl 将 ASCII 格式的十六进制字符串转换为相同的十六进制值

Question

我在 Perl 中有一个十六进制值作为 ASCII 字符串:

42dc3f74212c4e74bab2 <-- 这是一个字符串，但这也是我需要的实际十六进制值

我需要将其转换为十六进制，转换是指\x42\xdc\x3f 等。

$auth_key = pack("h*", $key); #It kind of works, but it gives me a low nibble, so I end up with 24 cd f3等

如何将这个字符串转换成相同值的十六进制!

我正在尝试将其输入 UDP套接字，如果有帮助的话。

Answer 1

使用pack 'H*', $key。

来自 perldoc -fpack:

h  A hex string (low nybble first).
H  A hex string (high nybble first).

这是 shell 的一些输出:

$perl -E'print pack "H*","42dc3f74212c4e74bab2"' | hd
00000000  42 dc 3f 74 21 2c 4e 74  ba b2                    |B.?t!,Nt..|
0000000a