Mr. Shawn H. Corey wrote:
On Sun, 2008-04-20 at 17:02 -0400, Richard Lee wrote:
Chas. Owens wrote:
On Sun, Apr 20, 2008 at 1:49 PM, Richard Lee <[EMAIL PROTECTED]> wrote:
snip
can this be optimized in anyway?
open (my $source, '-|', "tail -100000 /server/server.log")
is this the best way to get large portion(well file itself is over 20
times) of the file into find handle?
snip
Depending on how you are processing data, you may find
File::ReadBackwards* useful.
* http://search.cpan.org/dist/File-ReadBackwards/ReadBackwards.pm
This looks very useful.
Unfortunately however, the system I am on, I cannot install any modules
other than standard modules that already come with the perl.
But I will try this at my own system.
thanks!
Sadly, even ReadBackwards in no magic bullet. (And BTW, it should be
ReadBackward.)
It still has to go through the entire file and mark the offsets to the
start of every line.
The best way to do this is just to bite the bullet and do it.
There is no way to read say last 10 MB of the file or something? It's
very surprising why no such thing exists..
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
http://learn.perl.org/
