my $content;
 {
    open my $fh, '<', $fn or die "$fn: $!";
    local $/;
    $content = <$fh>;
 }