$Sendmail_Prog = 'SMTP:localhost';
.....
open(MAIL,"|$Sendmail_Prog -t");