RosettaCodeData/Task/DNS-query/Clojure/dns-query.clj
Ingy döt Net 764da6cbbb CDE
2013-04-10 16:57:12 -07:00

6 lines
291 B
Clojure

(import java.net.InetAddress java.net.Inet4Address java.net.Inet6Address)
(doseq [addr (InetAddress/getAllByName "www.kame.net")]
(cond
(instance? Inet4Address addr) (println "IPv4:" (.getHostAddress addr))
(instance? Inet6Address addr) (println "IPv6:" (.getHostAddress addr))))