Esempio CGI con CLISP e CL-CHI?

StackOverflow https://stackoverflow.com/questions/4669986

Domanda

Qualcuno mi potrebbe fornire un semplice expample di uno script CLISP, che usi

  • CGI
  • / usr / local / bin / clisp
  • CL-WHO o equivalente?

La mia installazione è costituito da apache2, clisp e quicklisp.

Grazie in anticipo!

È stato utile?

Soluzione

Quicklisp è una scelta buona. Quindi non importa se si utilizza CLISP, SBCL o CCL come implementazione.

Esegui questo nella shell: 

wget http://beta.quicklisp.org/quicklisp.lisp
clisp

Esegui questo nel 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))

Output: 

[...]
;;  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>
Autorizzato sotto: CC-BY-SA insieme a attribuzione
Non affiliato a StackOverflow
scroll top