Clojure SMS bulk sending multipart/form-data formular

sms.clj

(ns blog.sms
  (use blog.common)
  (:require [clojure.data.json :as json]
            [clj-http.client :as client]))

(defn post "the data to sms gateway over http" [body]
  (client/post "http://api/rpc/bulk/" {
                          :debug true
                          :multipart [
                                      {:name "username" :content "******"}
                                      {:name "password" :content "******"}
                                      {:name "filename" :content "recipients"} 
                                      {:name "file" :content (clojure.java.io/file "recipient.csv")}]}))
(defn -main []
  (print "sending sms over ******...") (flush)
  (post "to;from;message\n**********;\"SMS\";\"Hi\"")
  (println " done"))