tcllib/examples/smtpd