Perlでバイナリファイルからunsigned intを読み取るにはどうすればよいですか？

Question

のは、私が

[unsigned int(length of text)][text][unsigned int(length of text)][text][unsigned int(length of text)][text] 

のようにフォーマットされたバイナリファイルとだけ繰り返し続けているファイルのためにそのパターンを持っているとしましょう。私はどのようにしてunsigned intを読み、それを印刷してPerlのテキストブロックを出力しますか？

この場合も、これはバイナリファイルであり、プレーンテキストファイルではありません。

Answer 1

ここには小さな実例があります。

#!/usr/bin/perl 

use strict; 
use warnings; 

my $INT_SIZE = 2; 
my $filename = 'somefile.bin'; 

open my $fh, '<', $filename or die "Couldn't open file $filename: $!\n"; 

binmode $fh; 

while (read $fh, my $packed_length, $INT_SIZE) { 

    my $text = ''; 
    my $length = unpack 'v', $packed_length; 

    read $fh, $text, $length; 

    print $length, "\t", $text, "\n"; 
} 

変更INT_SIZEと（いずれかの「V」または「n」または「V」または「N」）を合わせてアンパックテンプレートのサイズとエンディアン。詳細については、unpackのマンページを参照してください。

Answer 2

データにunpack関数を使用する必要があります。チェックアウト：Pack/Unpack Tutorial (aka How the System Stores Data)

このあなたは（32ビットと仮定して）正しい方向に向かって取得する必要があります。

#!/usr/bin/perl 

use strict; 

my $strBuf = "perl rocks"; 
my $packed = pack("I Z15", length($strBuf), $strBuf); 
{ 
    open(my $binFile, '>', "test.bin") || die("Error opening file\n"); 
    binmode $binFile; 
    print $binFile $packed; 
    close $binFile; 
} 


open(my $binFile, '<', "test.bin") || die("Error opening file\n"); 
binmode $binFile; 

my $buffer; 
read($binFile, $buffer, 4); ## Read out unsigned int binary data 
my $length = unpack("I", $buffer); ## Unpack the data 

read($binFile, $buffer, $length); ## Read the length out as binary 
my $string = unpack("Z$length", $buffer); ## Unpack the string data in buffer 

print "Len: $length String: $string\n"; 
exit; 

Answer 3

unpackを使用することに加えて、RCが指摘するように、あなたはほぼ確実にデータを読み出すためにreadまたはsysreadを使用したいと思うでしょうファイルから。

Answer 4

ここでは、この問題を完全に解決するための十分な情報はありません。

長さフィールドとテキストフィールドの正確なフォーマットが必要です。 int 2バイト、4バイトまたは8バイトですか？ （すべて可能です）また、リトルエンディアンかビッグエンディアンですか？

この情報が与えられると、read関数を使用して最初の整数にアクセスし、ビット演算またはアンパック関数を使用して数値に変換します。

次の問題は、テキスト文字列の正確な形式です。それはASCII、EBCDIC、またはUTF形式ですか？これを知ることで、文字列の長さを計算し、1つまたは複数の読み取り操作を使用して、より管理しやすい形式に変換する必要のある生の文字列を取得できます。

バイナリモードでファイルを開く必要があります。そうしないと、期待どおりの結果が得られない場合があります。