A scheme interpreter written in Perl, as described in Bill Hails' book: http://billhails.net/Book/