#!/bin/sh
IFS=" "
exec /afs/wsi/i386_fbsd43/bin/scsh -s "$0" "$@"
!#

; hier die Klasse mit main eintragen! (ohne das .class)
(define class-name "TestCGI")

(define java-bin 
  "/afs/informatik.uni-tuebingen.de/i386_fbsd43/bin/java")

(define (compose-java-arg-list)
  (fold-right
   (lambda (pair s)
     (cons (string-append "-D" (car pair) "=" (cdr pair)) s))
   '() (env->alist)))

(run (,java-bin ,@(compose-java-arg-list) ,class-name))