#!/usr/local/bin/sbcl --script (let ((foo 42)) (set' foo (1+ 42)) foo) (+ 345 654) (format t "~{~a~%~a~}" (list 123 456))