Re^11: trying to implement file tail with regular expression

[poj]

See the tail option

When first started, read and return n lines from the file. 
If n is zero, start at the end of file. If n is negative, 
return the whole file. Default is 0.

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
);

poj

[mkhayat]

Its working finally. Thank you very much for your support I really appreciated :) :) :)