my $message = do { local $/; <> };