open(my $hlogfile,'<',$LOGFILE) or die "Could not open $LOGFILE: $!";