use File::Slurp; #... my @lines = read_file( 'file.name' );