从文件中读取一行而不使用Perl推进行计数器

前端之家收集整理的这篇文章主要介绍了从文件中读取一行而不使用Perl推进行计数器前端之家小编觉得挺不错的,现在分享给大家,也给大家做个参考。
我希望能够在不增加行计数器的情况下读取“下一行”,以​​便下次读取命令时它将读取同一行.

例:

这是第一行
这是第二行
这是第三行

我希望能够知道第二行说“这是第二行”,但没有推进我的计数器以便我的程序:

print <>;
print unknown_read_command;
print <>;

将在屏幕上打印:

这是第一行
这是第二行
这是第二行

而在更一般的情况下,我如何更改和移动指针到任何方向和我想要的任何数量的线?

解决方法

您可以使用 tell获取文件句柄的文件位置,并将其设置为 seek

my $pos = tell $fh;
# ...
seek $fh,$pos,0 or die "Couldn't seek to $pos: $!\n";

猜你在找的Perl相关文章