Как вы принимать загрузку файлов в нуар

Question

У меня есть установка входной файл, как этот

[:p "Upload a book"] 
     (form-to [:post "/upload"] 
       (file-upload :book) 
       (submit-button "Upload")) 

конечной точки My загрузки будет выглядеть следующим образом.

(defpage [:post "/upload"] {:keys [book]} (println book)) 

книга просто кажется строкой заголовка файла, который был загружен, а не самого файла. Как получить файл?

Answer 1

По этой теме (см второй пост Криса Грейнджер):

• http://groups.google.com/group/clj-noir/browse_thread/thread/58e45ad02bb21571

вы можете использовать что-то вроде:

(defpage [:post "upload"] {:keys [myFile]} 
    (println myFile) ;; see all the things the file contains 
    (io/copy (io/file (:tempfile myFile)) (io/file "uploads/some-new-name"))) 

Вот суть из этой темы:

• https://gist.github.com/1315692

с примечанием (опять-таки от Криса), что вам нужно Leiningen 1.6.1.1+ не впадать в ошибку.

Вы можете увидеть нечто подобное (хотя для Amazon S3) здесь:

• http://francesco-cek.com/uploading-a-file-to-amazon-s3-using-clojure-and-noir-2/

Надеется, что это помогает.

Answer 2

Я думаю, что вы принимаете штраф; Я считаю, что вы публикуете неправильно. Попробуйте form-to {:enctype "multipart/form-data"}, или из раковины curl --form book=@/home/me/Penguins.jpg http://localhost:8080/Upload