tie my @array, 'Tie::File', $outputFile or die $!;
my $line = $array[2];
print $line . "\n";
untie @array;