使用Hunchentoot搭建Lisp Web 服务器(2)

第三步是在sbcl中安装hunchentoot

首先是启动sbcl,然后载入刚才下载的quicklisp.lisp文件,载入quicklisp.lisp文件的命令和之前提到的载入样例lisp文件的方式是相同的,使用(load "<文件路径>")

下面是命令执行截图:

使用Hunchentoot搭建Lisp Web 服务器



载入quicklisp后,在Lisp命令界面依次执行下面的Lisp命令:

(quicklisp-quickstart:install)      (ql:add-to-init-file)      (ql:quickload "hunchentoot")      (ql:quickload "cl-who")  

quicklisp会帮你安装好hunchentoot

安装完成后通过(quit)命令退出sbcl(其实可以不退出继续执行后面的操作,不过这步是安装过程,后面是编写页面和服务器启动,所以退出一下,区分不同步骤)


第四步是编写hello world页面

安装好hunchentoot后通过vim或者是任意编辑器新建一个Lisp文件,我的文件名为:“~/workspace/lisp/hunchentoot.lisp”,大家可以根据喜好使用不同的文件名。

在该文件中写入一下代码:

(defun myserver ()                    (start (make-instance 'easy-acceptor :port 8080))              (define-easy-handler (greet :uri "/hello") ()                   (format nil "<html><body><h1>Hello world!</h1></body></html>")))  

上面的代码首先启动hunchentoot的一个实例,帧听8080端口,然后定义uri,指定访问“/hello”时执行后面的(format)代码输出一个简单的网页。

内容版权声明:除非注明,否则皆为本站原创文章。

转载注明出处:http://www.heiqu.com/f669ecd95ca4de81ce6d5eee7896366f.html