my $text = do {local $/; <FILE>};