sub extract_json {
    my $file = shift;
    local $/; #enable slurp
    open my $fh, "<", "$file";
    my $json = <$fh>;
    return $json;
}

my $json_data = extract_json("$master_conf");

my $decoded_json_obj = decode_json( $json_data);