Как использовать sendmail из Tcl

Question

Как отправить почту нескольким получателям в To и Cc, используя sendmail в Tcl?

Answer 1

Вы можете использовать пакет smtp, см., Например: Документ SMTP-пакета или Wiki .

Я думаю, вы можете, например, сделать:

  package require smtp
  package require mime

  set token [mime::initialize -canonical text/plain -string $body]
  smtp::sendmessage $token \
          -header [list Subject $subject] \
          -header [list To [join $recipient_list ","]] \
          -header [list Cc [join $cc_list ","]]
  mime::finalize $token

Answer 2

Если вы хотите использовать sendmail, создайте сообщение как строку и используйте опцию exec <<, чтобы передать его в stdin sendmail:

set msg {From: someone}
append msg \n "To: " [join $recipient_list ,]
append msg \n "Cc: " [join $cc_list ,]
append msg \n "Subject: $subject"
append msg \n\n $body

exec /usr/lib/sendmail -oi -t << $msg

Answer 3

Это также будет работать:

echo "Subject: test" | /usr/lib/sendmail -v you@domain.com