perl - binファイルからnullで終了する文字列を読み取ります

Question

binファイルから文字列を読み取りたい（文字列は固定オフセットから始まり、nullで終了します）。

Perlスクリプトでこれを行うにはどうすればよいですか？

Answer 1

seek必要に応じて正しい位置に移動し、次を使用します。

my $str;
{ local $/ = "\0"; $str = <$fh>; }
die "Premature EOF" if !defined($str) || $str !~ /\0\z/;
chop($str);