my $filename = 'c:\\somefile';
open my $fh, "<", $filename
  or die "Couldn't read '$filename': $!";
my @input = <$fh>;