Chris Knipe <mailto:[EMAIL PROTECTED]> wrote:
: open (LOG, '<'.LogFile);
Is this a typo? You're working on SQUIDLOG below.
LogFile is not in quotes. That should raise an error.
: for (;;) {
: while (<SQUIDLOG>) {
: # Do stuff here
: }
: }
: }
:
:
: This is unfortunately very expensive on my CPU. Are there any better
: ways to go about this??? tail comes to mind, but I'd prefer to do
: this all in perl.
What does 'tail' do? If it appends to the file, then open the log
for append.
my $file = 'LogFile';
open FH, '>>', $file or die qq(Cannot open "$file": $!);
# print to end of file.
close FH;
HTH,
Charles K. Clarkson
--
Mobile Homes Specialist
254 968-8328
--
To unsubscribe, e-mail: [EMAIL PROTECTED]
For additional commands, e-mail: [EMAIL PROTECTED]
<http://learn.perl.org/> <http://learn.perl.org/first-response>
