sub escape {
    my ($s) = @_;
    $s =~ s|\\|\\\\|g;
    $s =~ s|\"|\\\"|g;
    $s =~ s|\$|\\\$|g;
    return "\"" . $s . "\"";
}

        $res .= "    name = \"" . ($build->resultInfo->releasename or $build->nixname) . "\";\n"; # !!! escaping?
        $res .= "    system = \"" . $build->system . "\";\n"; # idem

        $res .= "    name = " . escape ($build->resultInfo->releasename or $build->nixname) . ";\n";
        $res .= "    system = " . (escape $build->system) . ";\n";

        $res .= "      description = \"" . $build->description . "\";\n"

        $res .= "      description = " . (escape $build->description) . ";\n"

        $res .= "      longDescription = \"" . $build->longdescription . "\";\n"

        $res .= "      longDescription = " . (escape $build->longdescription) . ";\n"

        $res .= "      license = \"" . $build->license . "\";\n"

        $res .= "      license = " . (escape $build->license) . ";\n"