let () = let zz = new Mail.mail in zz#set_from "mail@mydomain" ; zz#set_rcpt "mail@yourdomain" ; zz#set_subject "a message" ; zz#set_server "smtp.mydomain" ; zz#send ;;