my $text = do { open my $fh => $file or die "open: $!\n"; local $/; <$fh>; };