Help for this page
my $seek_loc = (-s FILE) - $bytes; $seek_loc = 0 if $seek_loc < 0; seek(FILE, $seek_loc, 0);
open(my $fh, '<', $file_name) or die("Unable to read log file \"$file_name\": $!\n");