perl 如何使用 pack\unpack

Question

我想在 '\x01' 值的二进制表示中放入变量一个字节。

我怎样才能在 perl 中做到这一点（我想我应该使用 pack 程序）

Answer 1

为此，您不需要 pack 。

print "\x01";

Answer 2

#!/usr/bin/perl

use strict; use warnings;
my $x = 1;
my $y = 0x01;
my $z = hex '01';

print chr for $x, $y, $z;

输出：

C:\Temp> t | xxd
0000000: 0101 01                                  ...

或者，

printf '%02X' for $x, $y, $z;

取决于您实际想要做什么。

Answer 3

包（“C”，“\x01”）；

Answer 4

谢谢。我已经整理好了。

我需要的是

my $post = pack("H1", '\x01');