open(IN,"somefile.pl");
undef $/;
$string = <IN>;