Subject: Re: File::Tail is broken on NetBSD -current FFS
To: Charlie Allom <>
From: Greywolf <>
List: current-users
Date: 05/04/2002 11:16:00
Hey, Yeled,

Looks like you (unfortunately*) need to toss in a sleep (5), or even a
sleep (1) into the while(){} loop.

* I say unfortunately because you'd think that perl might handle
it; OTOH, perl might be behaving correctly.  You might actually want
something that tails a file as fast as it can...

On Sun, 5 May 2002, Charlie Allom wrote:

#   use File::Tail;
#   $file=File::Tail->new("/var/log/messages");
#   while (defined($line=$file->read)) {
#       print "$line";
#   }

NetBSD: It keeps on going...and going...and going...