open (IN, "<", "myFile") or die "Cannot open: myFile: $!\n"; ; { local $/; $str = ; print "$str\n"; } close IN ;