Hello all, I was myself having some trouble to get information from the last lines of a file without having to go through the whole thing to get the, and stumbled upon this topic, and while reading I had the following idea:
open (FILE, $file); my @file = <FILE>; close FILE; for (my $count = ( (scalar @file) -1); $count >= 0; $count--){ #my $line = $file[count]; optional # do what you gotta do # to end the loop abruptly, just do: $count = -1; # This can be done from an else (if you are searching # patters with if's. #Or you can use another, increasing counter, so you can # choose the number of lines to look at, say 12, then: # if ($count_2 > 12) {$count = -1} }
I'd like advice and critics on the code above, what say you Monks? ps: I'm still a newbie, and haven't tried the code for time or memory use(Don't know how).

In reply to Re: Performing a tail(1) in Perl (reading the last N lines of a file) by Caio
in thread Performing a tail(1) in Perl (reading the last N lines of a file) by grinder

Title:
Use:  <p> text here (a paragraph) </p>
and:  <code> code here </code>
to format your post; it's "PerlMonks-approved HTML":