擅长:python、mysql、java
<p>如果要使用Perl:</p>
<p>用<code>:raw</code>层打开文件。我们不需要<code>:utf8</code>或<code>:crlf</code>翻译。在</p>
<p>然后,我们可以找到我们感兴趣的位置,并且可以读取几个字节</p>
<pre><code>my $size = -s $filename;
open my $fh, "<:raw", $filename;
for (seek($fh, 1536, 0) ; tell($fh) + 2048 < $size ; seek($fh, 2048 - 64, 1)) {
read $fh, my $buffer, 64;
...;
}
</code></pre>
<p>阅读</p>
<ul>
<li><code>perldoc -f tell</code></li>
<li><code>perldoc -f seek</code></li>
<li><code>perldoc -f read</code></li>
</ul>
<p>更多信息</p>