Data commit
This commit is contained in:
parent
7387c8f97b
commit
cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
8
Task/FTP/Common-Lisp/ftp.lisp
Normal file
8
Task/FTP/Common-Lisp/ftp.lisp
Normal file
|
|
@ -0,0 +1,8 @@
|
|||
(use-package :ftp)
|
||||
|
||||
(with-ftp-connection (conn :hostname "ftp.hq.nasa.gov"
|
||||
:passive-ftp-p t)
|
||||
(send-cwd-command conn "/pub/issoutreach/Living in Space Stories (MP3 Files)")
|
||||
(send-list-command conn t)
|
||||
(let ((filename "Gravity in the Brain.mp3"))
|
||||
(retrieve-file conn filename filename :type :binary)))
|
||||
Loading…
Add table
Add a link
Reference in a new issue