my $string;
{
  local $/ = undef;
  $string = <$filehandle>;
}