Средства и методы разработки

match(FILENAME, /([^\/]*)$/)
split(substr(FILENAME, RSTART), tmp, ".")
fbase = tmp[1]
ext = tmp[2]
gz = (tmp[3] == "gz")
cached = ext ~ /^(html|css|gif|png|js)$/
...
contyp["html"]  = "text/html; charset=utf-8"
contyp["shtml"] = "text/html; charset=utf-8"
contyp["css"]   = "text/css; charset=utf-8"
contyp["gif"]   = "image/gif"
contyp["png"]   = "image/png"
contyp["js"]    = "text/javascript; charset=utf-8"
contyp["json"]  = "application/json; charset=utf-8"
contyp["txt"]   = "text/plain; charset=utf-8"
...
prhdr("HTTP/1.1 200 OK")
prhdr("Content-Type: " contyp[ext])
gz && prhdr("Content-Encoding: gzip")
ext == "json" && prhdr("Access-Control-Allow-Origin: *")
prhdr("Cache-Control: " (cached ? "public, max-age=604800, immutable" : "no-store, max-age=0"))
prhdr("")