(require-extension http-client)

(use intarweb uri-common)
(client-software #f)

(let* ((uri (uri-reference "http://swapi.co/api/planets"))
       (req (make-request
             method: 'GET
             uri: uri
             headers: (headers '(user-agent (("scheme-swapi" #f #f)))))))

  (with-input-from-request req #f read-string))

(use intarweb uri-common http-client)

;; Will get put in the user-agent header if non-#f...
(client-software '(("scheme-swapi" #f #f)))


;; ... so we can use the "easy" variant of the API:
(with-input-from-request "http://swapi.co/api/planets" #f read-string)