Question

I want to read a string from bin file (The string start from fixed offset and is null terminated).

How can I do this in a Perl script?

Answer 1

seek to the right position if necessary, then use:

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