http://qs1969.pair.com?node_id=904582


in reply to Re: How to read every 16 line of file ?
in thread How to read every 16 line of file ?

You forgot to reset line numbers across file boundaries.
  • Comment on Re^2: How to read every 16 line of file ?

Replies are listed 'Best First'.
Re^3: How to read every 16 line of file ?
by Anonymous Monk on May 13, 2011 at 03:42 UTC
    FWIW, if reading from STDIN, there are no file boundaries :)

      My code reads from ARGV, not STDIN, so his comment does apply. Mind you, the OP said "file" singular, so resetting shouldn't be necessary.

      See eof to reset the counter between files when using ARGV.


      This is my sample code to be execute but this is sample only..
      #!/usr/bin/perl -w open (FILE, "/tmp/test.txt"); while ($line = <FILE>) { ... READ EVERY 16 LINE... } close(FILE);
        You can't "read every 16th line", you can "do something with every 16th line", and I showed how already. Just replace "say" with whatever you want to do to the selected lines.