Не удается отправить электронную почту из учетной записи группы Google с помощью Email:: MIME в Perl / CC, не получайте электронную почту

Я хочу отправить уведомление по электронной почте из учетной записи группы Google всякий раз, когда в моем скрипте perl, который читает и декодирует данные json, обнаруживается плохой контент.

Вот с чем я работаю:

  my $email = Email::MIME->create(
    header_str => [
      From           => '[email protected]',
      To             => '[email protected]',
      Cc             => ('[email protected]', '[email protected]', '[email protected]'),
      Subject        => 'YOrg Refresh Failed: Bad File',
      'Content-Type' => 'text/html',
    ],
    body => "<p>All,</p><p>An error occurred while processing the data from the latest refresh.</p><p>Please look into this as soon as possible.</p>"
  );
  sendmail($email);
  die $response->status_line;

Сначала я протестировал это, используя свой личный адрес электронной почты в качестве отправителя (от), и электронное письмо было отправлено, как и ожидалось. Но когда я использовал адрес групповой учетной записи («[email protected]»), электронное письмо не было отправлено. Это также действующая групповая учетная запись. Поэтому я не уверен, почему электронное письмо не будет отправлено с этой учетной записи.

Кроме того, в тестовом примере, когда я отправлял со своего личного адреса электронной почты, только псевдоним «[email protected]» получил электронное письмо, и ни один из других адресов с копией не получил его.


email perl mime
person Ian Balas    schedule 27.07.2020    source источник

Ответы (1)


arrow_upward
3
arrow_downward

Вторая половина вашей проблемы заключается в том, что вы пытаетесь присвоить список хэш-значению вместо ссылки на анонимный массив. Этот:

Cc => ('[email protected]', '[email protected]', '[email protected]'),

должно быть:

Cc => ['[email protected]', '[email protected]', '[email protected]'],

Поскольку вы даете ему список, Perl анализирует ваше утверждение следующим образом:

header_str => [
  From               => '[email protected]',
  To                 => '[email protected]',
  Cc                 => '[email protected]',
  '[email protected]' => '[email protected]',
  Subject            => 'YOrg Refresh Failed: Bad File',
  'Content-Type'     => 'text/html',
],
person Jim Davis    schedule 27.07.2020