清单 4. 用 scsh 编写的查找所有可执行文件的脚本

#!/usr/bin/scsh -s

!#

(define argc

(length command-line-arguments))

(define (write-ln x)

(display x) (newline))

(define (showfiles dir)

(for-each write-ln

(with-cwd dir

(filter file-executable? (directory-files "." #t)))))

(if (not (= argc 1))

(write-ln "Usage is fae.scsh dir")

(showfiles (argv 1)))

结束语

早期 shell 的许多理念和大量接口在之后的 35 年几乎未变 — 这是对早期 shell 的原始作者的贡献的有力证明。在一个不断自我改造的行业中，shell 已大大改进，但没有发生重大变化。尽管存在过创建特殊 shell 的尝试，但 Bourne shell 的衍生物仍然是所使用的主要 shell。