Perl中的文件句柄

Question

而不是我习惯的典型文件句柄:

open INPUT, $input;
while ($line = <INPUT>) {
    ....
}
close INPUT;

如何检索文件中指向行的指针,以便我可以在wiil处推进这些指针？我正在尝试创建指向其相应排序文件的两个指针,以便我可以根据一个文件中的行是否比另一个文件中的行"更少"或"更大"来推进指针.

注意:假设输入文件是BIG.

Answer 1

如果我理解正确,

perldoc -f tell

请注意,您tell只想在读取一行之前获取该行的起始位置.

返回给定位置的功能是seek.

或者,Tie :: File将允许您将文件视为一个行数组,并在幕后进行一些巧妙的管理.