All the Perl that's Practical to Extract and Report
(define (square x) (* x x)) (define (sum-of-squares x y) (+ (square x) (square y)))
I now have the Wizard book. It's about time.