DN507765369

Subject: Re: How to attach a file to email? - DN [1]

"Marshall Rose" <mrose.netnews@lists.dbc.mtview.ca.us> - 01 Aug 1999 - comp.lang.tcl

 i'm a few weeks away from releasing a Tcl MIME package that will allow you
 to send messages via SMTP, and parse messages using MIME.

 here's what the calling sequence would look like assuming that you wanted to
 include a plaintext file in the message:

 smtp::sendmessage \
     [mime::initialize -canonical text/plain -param {charset us-ascii} \
                             -param [list name $file] -file $file] \
     -header [list To $address] \
     -header [list Subject $subject]

 i'm looking for alpha testers. if anyone's interested, reply privately.

 /mtr

 Michalowski, Martin [KAN:0Q64:EXCH] <stud0v64@americasm01.nt.com> wrote in
 message news:379F47B5.9F3A4FBB@americasm01.nt.com...
 > I'm using the following for sending email:
 >
 >       set m [open "|mail $email" w]
 >       puts  $m "Subject: $subj\n"
 >       puts  $m $text
 >       close $m
 >
 > Does anybody have a script for attaching a file?
 >
 > --
 > Martin