my $lines = do {
  local $/; # sets $/ locally to undef;
  <FILE>;
};