sbcl の http-request の使い方 (Get)

Common Lisp のひとつである、sbcl の http Get のサンプルです。
quicklisp.lisp のインストールが済んでいるものとします。

sbcl_get.lisp

#! /usr/bin/sbcl --script
; -------------------------------------------------------------------
;   sbcl_get.lisp
;
;                       Mar/02/2018
;
; -------------------------------------------------------------------
(format t "*** 開始 ***~%")
(load "~/quicklisp/setup.lisp")
(ql:quickload :drakma)
(defvar out_str)
(setf out_str (flexi-streams:octets-to-string
    (drakma:http-request "http://httpbin.org/get")
    ))
(format t out_str)
(format t "*** 終了 ***~%")
(quit)
; -------------------------------------------------------------------

実行結果

$ ./sbcl_get.lisp 
*** 開始 ***
To load "drakma":
  Load 1 ASDF system:
    drakma
; Loading "drakma"
....
{
  "args": {}, 
  "headers": {
    "Accept": "*/*", 
    "Connection": "close", 
    "Host": "httpbin.org", 
    "User-Agent": "Drakma/2.0.4 (SBCL 1.4.0; Linux; 4.15.5-1-ARCH; http://weitz.de/drakma/)"
  }, 
  "origin": "153.233.236.237", 
  "url": "http://httpbin.org/get"
}
*** 終了 ***