ASCIIとバイナリの相互変換がしたい

質問

アスキーで入力されたバイナリを、ソケットで送信するというものと書きたいのですが・・・。

具体的には、ファイルに 0x414243 と書いてあって、これを ABC という文字列でsocket通信で送りたいのです。
（これで、バイナリレベルでは414243が送れるはず）
socketの部分はできているのですが、変換でつまずいています。

まず、配列 @temp を用意して、41 42 43を順にpushしました。で、次にこれをABCに直してソケットの送信関数に渡せばいいのですが、どうやってもABCになってくれません。

pack("C*","0x41","0x42","0x43")
とやれば、ABCが出てきますが、
pack("C*",@temp)
では当然のようにダメ。
"0x41""0x42""0x43"を順に@tempに入れましたが、これも失敗。

Perlの16進表現はよくわからないのですが、どうしたらいいのでしょうか。

回答No.1

tailkuppa · ベストアンサー

えと、41, 42, 43 ではなく、"0x41", "0x42", "0x43" と文字列にもせず、そのまま入れたらいいのではないでしょうか。

手元の環境では、
#/usr/bin/perl
@temp = (0x41,0x42,0x43);
print pack("C*", @temp);

で、
ABC
が出ました。
socket とかは使ったことがないのですが、0x41 とかの記法はC と同じです。
ちなみに、0101 みたいに0を先頭にすると８進法表記になります。
これもC と同じです。

お礼

ボケをかましていたようでお恥ずかしいです(汗
また、配列の初期化の方法が間違っていたようで、先頭にゴミがついていたのも原因だったようです。ひとつ勉強になりました。ありがとうございました。