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