「\x01」値のバイナリ表現で変数 1 バイトを入れたい。
どうすればperlでそれを行うことができますか(パック手順を使用する必要があると思います)
その必要はありませんpack
。
print "\x01";
#!/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;
実際に何をしようとしているのかによって異なります。
pack("C", "\x01");
ありがとうございました。私はすでにそれを整理しました。
私が必要としていたのは
my $post = pack("H1", '\x01');