如何使用eXist-db下载和保存图片？

Question

我正在使用eXist-db，并试图下载一张图片并使用XQuery将其保存在本地磁盘上。我曾尝试下面的代码：

declare namespace xmldb="http://exist-db.org/xquery/xmldb"; 

import module namespace http="http://exist-db.org/xquery/httpclient"; 
import module namespace util="http://exist-db.org/xquery/util"; 

let $url := 
    "https://upload.wikimedia.org/wikipedia/commons/4/47/PNG_transparency_demonstration_1.png" 
let $response := http:get(xs:anyURI($url), true(), <Headers/>) 
let $picture := util:base64-decode($response//httpclient:body) 
return 
    xmldb:store("/db/apps/places", "picture.png", $picture) 

上面的代码下载的图片，但是当我尝试打开图像，我得到一个错误。

我希望能很好地解释我的问题。

Answer 1

查看我的完整注释，工作示例代码，用于通过HTTP下载文件并将其存储在eXist-db中，地址为https://gist.github.com/joewiz/5938909。