my $fh = File::Tail->new(
  name        => $Config->{'_'}{'DIAGFILE'},
  interval    => 1,  # wait at start
  maxinterval => 10, # change to suit
  adjustafter => 10,  # change to suit
  tail        => -1, # all lines read at start up
);