将FileHandle引用为数组

Question

假设我有一个4 4GB的文件需要处理，在Perl中有没有一种方法可以让我像引用数组一样引用文件句柄，而无需将其复制到实际的数组/内存中？

类似于：

open (LOG, "less file.txt |");
my @reference = \<LOG>;
print $reference[1000000];
close LOG;

谢谢你！！

Answer 1

使用Tie::File。

use Tie::File;
tie my @array, 'Tie::File', $filename or die "tie $filename: $!";

print $array[42];