#! lisp

(load "/lib/lisp/core.lsp")

(var url (first args))
(var dst (filename url))

(shell (str "http " url " => " dst))
