open (MAIL, "|$mailProg") || die "Can't create pipe to $mailProg: $!";