my $Filename = “...”;
my $Filehandle;
open $Filehandle, ‘<‘, $Filename or die “cant open file.\n”;
my @Lines = <$Filehandle>;
close $Filehandle;
...