Help for this page

Select Code to Download

Select or download this

my $prev = '';
while( 1 ) {
...
    sleep 15;
    seek LOG, 0, 1; # Clear EOF flag
}