Gary Yang has asked for the wisdom of the Perl Monks concerning the following question:
Hi,
I got the errors when I tried to send out email.
CPT TO: error (553 sorry, that domain isn't in my list of allowed rcpthosts (#5.7.1))
Below is the code. Please help.
I got the errors when I tried to send out email.
CPT TO: error (553 sorry, that domain isn't in my list of allowed rcpthosts (#5.7.1))
Below is the code. Please help.
#!/opt/ActivePerl-5.14/bin/perl -w use Mail::Sendmail qw(sendmail %mailcfg); my (%mail, $MailTo, $subject, $message, $from); $mailcfg{smtp} = [qw(mail.mycompany.com)]; $mailcfg{port} = 25; # default $MailTo = 'someone1@yahoo.com'; $from = 'someone2@yahoo.com'; $subject = "Test"; $message = "Message Test"; %mail = ( To => $MailTo, From => $from, Subject => $subject, Message = +> $message); sendmail(%mail);
|
---|
Replies are listed 'Best First'. | |
---|---|
Re: Mail::Sendmail Cannot Send out email
by stevieb (Canon) on May 02, 2012 at 20:08 UTC | |
Re: Mail::Sendmail Cannot Send out email
by trwww (Priest) on May 03, 2012 at 04:34 UTC | |
by tobyink (Canon) on May 03, 2012 at 06:33 UTC | |
Re: Mail::Sendmail Cannot Send out email
by mendeepak (Scribe) on May 04, 2012 at 06:40 UTC |
Back to
Seekers of Perl Wisdom