perl как использовать pack \ unpack

Question

Я хочу поместить в переменную один байт в двоичном представлении значения '\ x01'.

Как я могу сделать это в Perl (я думаю, я должен использовать процедуру упаковки)

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

Спасибо.Я уже разобрался.

Мне нужно было

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

Answer 4

pack ("C", "\ x01");