如何使用eXist-db 下载并保存图片?

How to download and save a picture with eXist-db?

我正在使用 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)

上面的代码下载了图片,但是当我尝试打开图片时出现错误。

我希望已经很好地解释了我的问题。

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