my $poem = do { local $/; };