{
   open(IN,"somefile.pl");
   local $/;
   undef $/;
   $string = <IN>;
}
#previous version of $/ is now restored