use File::Slurp; my @array = read_file($filename);