#!/usr/bin/perl $mailprog = '/usr/sbin/sendmail'; $recipient = 'charley@aug.com'; print "Content-type: text/html\n\n"; print "