(servlet (name email comment) (case name ((#null) {
name:
email:
comment:

}) (else (send-mail request "tjhickey@brandeis.edu" ;to email ;from "Someone visited your page" ;subject comment ;message ) (send-mail request email "cs2a@cs.brandeis.edu" "thanks for the comments" {email:[email] and su nombre es [name] and you said=[comment]} ) {Thanks [name] for your comment, it has been sent to the author} ) ; close else ) ; close case ) ; close servlet