とりあえずですが書いてみました。 (require :sb-bsd-sockets) (defpackage web (:use :cl :sb-bsd-sockets)) (in-package web) (defun resolve-hostname (name-or-IPv4Address) (car (host-ent-addresses (get-host-by-name name-or-IPv4Address)))) (defun…