Simple Perl TT mailer