Greetings;
I can't seem to find the problem with the Email::Send
portion of this program. It may be that I am getting an
error from the smtp server but I haven't been able to adapt
an error routine that works with Mail::Sender to work with
Email::Send.
Anybody have any insights?
Many thanks,
Dennis
<< Program follows >>
#!/usr/bin/perl
use strict;
use warnings;
use Email::Send;
use Mail::Builder;
my $mail = Mail::Builder->new();
$mail->from('t...@mgssub.com','TFRG');
$mail->to->add('dgwi...@gmail.com','Dennis Wicks');
$mail->subject('Testing Email::Send and Mail::Builder Again');
$mail->htmltext('<h1>Testing perl email modules</h1> <br> This is a test of the
Email::Send and Mail::Builder <br>modules. ');
$mail->plaintext('You must view as html mail');
my $sender = Email::Send->new({mailer => 'SMTP'});
$sender->mailer_args([Host => 'smtpout.secureserver.net:3535'],
[username => 't...@mgssub.com'],
[password => 'xxxxxxxx']);
$sender->send($mail -> stringify);
--
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/
