url.lua

local function parse_url(url)
    local out = {}
    url = string.gsub(url, "#(.*)$", function(f) 
        out.fragment = f
        return "" 
    end)
    url = string.gsub(url, "^([%w][%w.+-]*):", function(s)
        out.scheme = s
        return "" 
    end)
    url = string.gsub(url, "^//([^/]*)", function(n)
        out.authority = n 
        return "" 
    end)
    url = string.gsub(url, "%?(.*)", function(q)
        out.query = q 
        return "" 
    end)
    url = string.gsub(url, ";(.*)", function(p)
        out.params = p
        return "" 
    end)

    if not (out.scheme or out.authority) then
        return false
    end

    out.path = url == "" and "/" or url
    return out
end