my @log_file_contents = <FH>;
map { $_ =~ s/[\r\n]//g' } @log_file_contents;
print "$log_file_contents[6]\n";
print "$log_file_contents[1003]\n";
print "$log_file_contents[2965]\n";