第三步是在sbcl中安装hunchentoot
首先是启动sbcl,然后载入刚才下载的quicklisp.lisp文件,载入quicklisp.lisp文件的命令和之前提到的载入样例lisp文件的方式是相同的,使用(load "<文件路径>")
下面是命令执行截图:
载入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)代码输出一个简单的网页。