Common lisp CLISP和CL-WHO的CGI示例?

Common lisp CLISP和CL-WHO的CGI示例?,common-lisp,clisp,quicklisp,cl-who,Common Lisp,Clisp,Quicklisp,Cl Who,有人能给我一个简单的clisp脚本的示例吗 CGI /usr/local/bin/clisp CL-WHO或同等职位 我的安装由apache2、clisp和quicklisp组成 提前谢谢 Quicklisp是一个不错的选择。那么,是否使用clisp、sbcl或ccl作为实现并不重要 在shell中运行以下命令: wget http://beta.quicklisp.org/quicklisp.lisp clisp 在Lisp中运行以下命令: (load "quicklisp.lisp")

有人能给我一个简单的clisp脚本的示例吗

  • CGI
  • /usr/local/bin/clisp
  • CL-WHO或同等职位
我的安装由apache2、clisp和quicklisp组成


提前谢谢

Quicklisp是一个不错的选择。那么,是否使用clisp、sbcl或ccl作为实现并不重要

在shell中运行以下命令:

wget http://beta.quicklisp.org/quicklisp.lisp
clisp
在Lisp中运行以下命令:

(load "quicklisp.lisp")
(quicklisp-quickstart:install)
(ql:add-to-init-file)
(ql:quickload "cl-who")
(defpackage :webmaker
  (:use :cl :cl-who))
(in-package :webmaker)
(with-html-output (*standard-output* nil :prologue t)
    (:html (:body "Not much there"))
    (values))
输出:

[...]
;;  Loaded file /home/xxx/quicklisp/setup.lisp
;; Loaded file /home/xxx/.clisprc.lisp
[1]> (ql:quickload "cl-who")
To load "cl-who":
  Load 1 ASDF system:
    cl-who
; Loading "cl-who"

("cl-who")
[2]> (defpackage :webmaker
  (:use :cl :cl-who))
#<PACKAGE WEBMAKER>
[3]> (in-package :webmaker)
#<PACKAGE WEBMAKER>
WEBMAKER[4]> 
(with-html-output (*standard-output* nil :prologue t)
    (:html (:body "Not much there"))
    (values))
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Strict//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-strict.dtd">
<html><body>Not much there</body></html>
[…]
;;  已加载文件/home/xxx/quicklisp/setup.lisp
;; 已加载文件/home/xxx/.clisprc.lisp
[1] >(ql:quickload“cl who”)
要加载“cl who”:
加载1 ASDF系统:
cl谁
; 正在加载“cl who”
(“cl who”)
[2] >(defpackage:webmaker)
(:用法:cl:cl-who))
#
[3] >(打包:webmaker)
#
网络制作人[4]>
(带有html输出(*标准输出*nil:prologue t)
(:html(:body“不多”))
(价值观)
没有多少