Example of using web client in guile

guile-http-client.scm

(use-modules (web client)
             (web response)
             ((rnrs) :version (6)))

(define port "8000")
(define body "{\"foo\": \"xyx\"}"  )

;; GOTCHAs
;; Body needs to be converted from string to utf8 and back again
;; Need to destructure response with let-values in order to get body string
;;    if streaming is set to #t, this will be a port

(let-values ([(res body) (http-request (string-append "http://localhost:" port)
                                   #:method 'POST 
                                   #:headers '((Content-Type . "application/json")) 
                                   #:streaming? #f
                                   #:decode-body? #t
                                   #:body (string->utf8 body))]) 
    (display (utf8->string body))
    (display "\n"))