use File::Slurp; my $text = read_file( 'filename' );