如何使用Tcl的sendmail

Question

如何使用Tcl中的sendmail將郵件發送到To和Cc中的多個收件人？

Answer 1

如果你想實際使用sendmail，建立消息作爲字符串，用exec <<選項，將它傳遞給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 2

您可以使用smtp包，請參閱例如：SMTP package docu或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 3

這也將工作：

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