open MAIL, "|mail $mail" or die "Mail problem: $!";