perl读取大文件能否直接定位第a-b行而不读取整个文件

白水2009

perl对文本处理一般都是整个文件读进变量后进行，现在有个情况：
要处理一些大尺寸的文件，比如动辄上G的文件，取出第a行到第b行之间的内容，
但是如果整个读进去，那太慢了，请教下各位，有没有办法直接定位到某一行，或者某一字节，而不是读取全部文件呢？

[ 本帖最后由 白水2009 于 2009-2-28 19:14 编辑 ]

wxlfh

1. open FH,"<","yourfile.txt";
   
2. while (<FH>){
   
3.     next if $.<$aa;
   
4.     last if  $.>$bb;
   
5.     #在这里处理你的文本
   
6. }
   
7. close FH;

复制代码

我记得还有一个更简便的方法，但是具体忘记了。上面的凑合着还可以用用。

[ 本帖最后由 wxlfh 于 2009-2-28 19:36 编辑 ]

MMMIX

原帖由 白水2009 于 2009-2-28 19:13 发表
perl对文本处理一般都是整个文件读进变量后进行，

谁告诉你的？都是建议不要这么做，除非文件很小。

churchmice

1. 
   
2. kernel@fairland:~$ perl -ne 'print if 2..9' /etc/conf.d/net.example
   
3. # QUICK-START
   
4. #
   
5. # The quickest start is if you want to use DHCP.
   
6. # In that case, everything should work out of the box, no configuration
   
7. # necessary, though the startup script will warn you that you haven't
   
8. # specified anything.
   
9. 
   
10. # WARNING :- some examples have a mixture of IPv4 (ie 192.168.0.1) and IPv6
    

复制代码

use range operator in scalar context.
默认跟$.进行比较

flw

原帖由 MMMIX 于 2009-2-28 19:52 发表

谁告诉你的？都是建议不要这么做，除非文件很小。

是啊！我也很奇怪！
很好奇到底是哪一本破书，居然收看率这么高！

justlooks

除非$/=undef吧，不然都是1行行读的

wxlfh

除非文件很小，可以一次性读入来处理，比如几兆，最多几十兆，上百兆的一般都是按行处理的。

infernor

小骆驼上说，400M的文件，如果一次性读入内存的话，可能要占用1G内存，甚至更多

FinalBSD

试试Tie::File?

MMMIX

原帖由 FinalBSD 于 2009-3-2 10:05 发表
试试Tie::File?

That's it!