open (MAIL,"|$sendmail");