Select Code to Download

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