open ( MAIL, "| $sendmail" ) or die $!;