use Tie::File;

use strict;
use warnings;

my @log_file_contents;
tie @log_file_contents, 'Tie::File', "filename"
  or die "Can't open filename";
print "$log_file_contents[6]\n";