#!/usr/bin/perl use Mail::Sender; $sender = new Mail::Sender ######### MS Exchange SMTP server #################### {smtp => '', from => ''}; $recipients = ""; if (ref $sender->OpenMultipart({ from => '', to => $recipients, subject => 'chandan Embedded Image Test', boundary => 'boundary-test-1', multipart => 'related'})) { ##################### I have to send this part msg as inline ######### +############# $sender ->Attach( {description => 'html body', ctype => 'text/html; charset=us-ascii', #encoding => '7bit', disposition => 'NONE', file => 'file2.html', }); ################### I have to send this part msg as Attachment ###### +############### $sender ->Attach( {description => 'html body', ctype => 'text/html; charset=us-ascii', #ctype => 'text/html', #encoding => '7bit', #disposition => 'inline', file => 'auth_sasl.pl', }); $sender->Close() or die "Close failed! $Mail::Sender:: +Error\n"; } else { die "Cannot send mail: $Mail::Sender::Error\n"; } exit;
In reply to Re^2: EMail problem in outlook
by chandanperl
in thread EMail problem in outlook
by chandanperl
| For: | Use: | ||
| & | & | ||
| < | < | ||
| > | > | ||
| [ | [ | ||
| ] | ] |