use strict;
use warnings;
use autodie;

my $filename = 'filename.txt';
open my $ifh, '<', $filename;
my @lines = <$ifh>;
close $ifh;