-1

「\x01」値のバイナリ表現で変数 1 バイトを入れたい。

どうすればperlでそれを行うことができますか(パック手順を使用する必要があると思います)

4

4 に答える 4

1

その必要はありませんpack

print "\x01";
于 2010-11-24T12:47:31.083 に答える
1
#!/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;

実際に何をしようとしているのかによって異なります。

于 2010-11-24T12:55:59.673 に答える
0

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

于 2010-11-24T12:36:38.630 に答える
-2

ありがとうございました。私はすでにそれを整理しました。

私が必要としていたのは

my $post = pack("H1", '\x01');
于 2010-11-24T13:06:17.177 に答える