I whipped up the attached script one day for a customer. It uses
Net::SMTP and MIME::Base64. Its a cgi that will upload
a file and then attach that to an email. I'm sure you
can pick it apart and get it to work for you.. This runs on
IIS 4.0.. BTW CDO sucks.. IMHO

Floyd R.

|> -----Original Message-----
|> From: [EMAIL PROTECTED]
|> [mailto:[EMAIL PROTECTED]]On Behalf Of
|> Scot Robnett
|> Sent: Wednesday, February 27, 2002 1:08 PM
|> To: Burak G�rsoy; Bryan T. O'Malley;
|> [EMAIL PROTECTED]
|> Subject: RE: sending a file as an e-mail Attachment using Perl
|>
|>
|> I also use MIME::Lite. Works like a charm on *NIX, but I can't get it to
|> work with IIS on Win2K. I guess it's because my Windows host
|> requires you to
|> use a CDO object instead of an actual executable mail program,
|> since they're
|> an ASP shop.
|>
|> -----Original Message-----
|> From: [EMAIL PROTECTED]
|> [mailto:[EMAIL PROTECTED]]On Behalf Of
|> Burak G�rsoy
|> Sent: Wednesday, February 27, 2002 12:45 PM
|> To: Bryan T. O'Malley; [EMAIL PROTECTED]
|> Subject: RE: sending a file as an e-mail Attachment using Perl
|>
|>
|> I use MIME::Lite
|>
|>
|> -----Original Message-----
|> From: [EMAIL PROTECTED]
|> [mailto:[EMAIL PROTECTED]]On
|> Behalf Of Bryan
|> T. O'Malley
|> Sent: Wednesday, February 27, 2002 8:33 PM
|> To: [EMAIL PROTECTED]
|> Subject: sending a file as an e-mail Attachment using Perl
|>
|>
|> I have used net::smtp to send e-mail. Works great.
|>
|>
|> I am unable to figure out how to send a file as an e-mail
|> attachment using
|> Perl.
|>
|> Any pointers toward the solution to this problem will be greatly
|> appreciated.
|>
|> Thank-you,
|>
|> Bryan.
|>
|>
|>
|>
|>
|>
|> Bryan O'Malley, Actinide Analytical Chemistry, C-AAC
|> Quality and Information Management Team, MS G-740
|> PO Box 1663, MS G740, Los Alamos, NM 87545 Tel 505-665-1769
|> Fax (Lab Business Only): 505-665-4737
|> Personal Fax: (605)253-1459
|>
|>
|> _________________________________________________________
|> Do You Yahoo!?
|> Get your free @yahoo.com address at http://mail.yahoo.com
|>
|> _______________________________________________
|> Perl-Win32-Users mailing list
|> [EMAIL PROTECTED]
|> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
|>
|> ---
|> Incoming mail is certified Virus Free.
|> Checked by AVG anti-virus system (http://www.grisoft.com).
|> Version: 6.0.325 / Virus Database: 182 - Release Date: 2/19/2002
|>
|> ---
|> Outgoing mail is certified Virus Free.
|> Checked by AVG anti-virus system (http://www.grisoft.com).
|> Version: 6.0.325 / Virus Database: 182 - Release Date: 2/19/2002
|>
|> _______________________________________________
|> Perl-Win32-Users mailing list
|> [EMAIL PROTECTED]
|> To unsubscribe: http://listserv.ActiveState.com/mailman/mysubs
|>

Attachment: upload.pl
Description: Binary data

Reply via email to