aparler/RosettaCodeData
1
0
Fork 0
Code Issues 12 Pull requests 3 Projects Releases Packages Wiki Activity Actions

Data commit

Browse source
This commit is contained in:
Ingy döt Net 2023-07-01 11:58:00 -04:00
parent 7387c8f97b
commit cb5bb5e222
199093 changed files with 3378972 additions and 0 deletions
Download patch file Download diff file Expand all files Collapse all files

24
Task/Send-email/Racket/send-email.rkt Normal file
View file

@ -0,0 +1,24 @@
#lang racket
;; using sendmail:
(require net/sendmail)
(send-mail-message
"sender@somewhere.com" "Some Subject"
'("recipient@elsewhere.com" "recipient2@elsewhere.com")
'("cc@elsewhere.com")
'("bcc@elsewhere.com")
(list "Some lines of text" "go here."))
;; and using smtp (and adding more headers here):
(require net/head net/smtp)
(smtp-send-message
"192.168.0.1"
"Sender <sender@somewhere.com>"
'("Recipient <recipient@elsewhere.com>")
(standard-message-header
"Sender <sender@somewhere.com>"
'("Recipient <recipient@elsewhere.com>")
'() ; CC
'() ; BCC
"Subject")
'("Hello World!"))