Я не получаю письмо, когда пытаюсь отправить сообщение с помощью Perl (MIME :: Lite)

347
Pankaj Kumar
#!/usr/bin/perl use MIME::Lite; my $to = 'mkumar@birdserver.com'; my $from = 'pkumar@birdserver.com'; my $subject = "Eventful"; my $message = " Hi - Test email"; $msg = MIME::Lite->new( From => $from, To => $to, Subject => $subject, Data => $message );  $msg->attr('content-type' => 'text/html'); $msg->send; 

Я использую приведенный выше скрипт для отправки электронной почты с использованием Perl, но иногда я не получаю их. Когда я проверил свой почтовый журнал, я получил это сообщение -

 Mar 27 08:16:02 EQ-BIRDSERVER sendmail[14361]: v2RFG24m014361: to=root, delay=00:00:00, mailer=relay, pri=30444, stat=queued Mar 27 08:16:15 EQ-BIRDSERVER sendmail[4168]: rejecting connections on daemon MTA: load average: 68 

Есть ли способ отправить письмо даже при большой нагрузке на машину?

0

1 ответ на вопрос

0
Steffen Ullrich

Есть ли способ отправить письмо даже при большой нагрузке на машину?

Это не то, что вы можете исправить из своего скрипта Perl. Поведение sendmail при высокой нагрузке зависит от конфигурации sendmails, что означает, что вам нужно либо исправить это, либо убедиться, что на машине нет высокой нагрузки.

В качестве альтернативы вы можете поиграть с различными вариантами отправки почты, как описано в документации, чтобы посмотреть, можно ли обойти ограничения нагрузки.

Похожие вопросы