my $str;
{
    local $/; # sets $/ to undef only WITHIN the braces
    open FILE, $filename or die "Can't open $filename: $!\n";
    $str = <FILE>;
    close FILE:
}