lua域名正则获取ip

local lpeg = require("lpeg")

-- 定义域名的正则表达式模式
local domain_pattern = lpeg.P{
    "domain",
    domain = lpeg.C((lpeg.P(1) - lpeg.P"." - lpeg.P"-" - lpeg.P"_")^0) * lpeg.P"." *
             (lpeg.P(1) - lpeg.P"." - lpeg.P"-" - lpeg.P"_")^0 * lpeg.P"." *
             (lpeg.P(1) - lpeg.P"." - lpeg.P"-" - lpeg.P"_")^0
}

-- 示例文本
local text = "Visit our website at www.example.com or contact us at support.example.co.uk."

-- 提取域名
local domains = {}
for domain in lpeg.gmatch(text, domain_pattern) do
    table.insert(domains, domain)
end

-- 打印提取的域名
for _, domain in ipairs(domains) do
    print(domain)
end

-- 获取域名的IP地址（示例中使用了一个简单的模拟函数）
local function get_ip(domain)
    -- 这里应该使用DNS查询来获取真实的IP地址
    -- 为了示例，我们使用一个简单的映射
    local ip_map = {
        ["www.example.com"] = "93.184.216.34",
        ["support.example.co.uk"] = "192.0.2.1"
    }
    return ip_map[domain] or "IP not found"
end

-- 打印每个域名的IP地址
for _, domain in ipairs(domains) do
    print(domain .. " -> " .. get_ip(domain))
end