use File::Slurp;
my @lines = read_file( 'filename' );