Skip to content

Instantly share code, notes, and snippets.

@joshuakfarrar

joshuakfarrar/hello-labs.lisp

Last active October 7, 2015 17:39
Show Gist options
  • Save joshuakfarrar/d90b61b70e4b847f0a41 to your computer and use it in GitHub Desktop.
Save joshuakfarrar/d90b61b70e4b847f0a41 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
hello-labs.lisp
;;;; compiled using `buildapp --output hello --entry main --load hello-labs.lisp`
;;;; run using ./hello http://labs.sent1nel.me
(load "/home/sent1nel/quicklisp/setup.lisp")
(ql:quickload "drakma")
(defun main (argv)
(multiple-value-bind (body-or-stream status-code)
(drakma:http-request (nth 1 argv))
(format t "~s~%" body-or-stream)
(format t "~d~%" status-code)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment