Модуль Perl - MIME :: Lite :: TT :: HTML, отправляет содержимое HTML в виде вложения - PullRequest
0 голосов
/ 19 октября 2011

Вот фрагмент из моего Perl-скрипта:

my %params = (
  sub_name            => $sub_name, 
  asm_name            => $asm_name,
  zsm                 => $zsm,
  store               => $store,
  pin                 => $pin,
  tier                => $tier,
  avg_weekly_all      => $avg_weekly_all,
  avg_weekly_br       => $avg_weekly_brakes,
  expected_sales      => $expected_sales,
  numOfBays           => $numOfBays,
  numOfTechs          => $numOfTechs,
  estimatedJobs       => $estimatedBrakeJobs,
  brand               => $brand,
  qty                 => $qty
);

my %options = (INCLUDE_PATH => '.');

my $msg = MIME::Lite::TT::HTML->new(
  From        => 'xxx.xxxx@somecompany.com',
  To          => 'me@somecompany.com',
  Subject     => "Request (MSG ID: $id)",
  Template    => { html => 'edge14.html.tt' },
  TmplOptions => \%options,
  TmplParams  => \%params
);

$msg->attr("content-type" => "multipart/mixed");

$msg->attach(
  Type => 'text/csv',
  Path => 'out.txt',
  Filename => "brake_lift_$id" . ".csv",
  Disposition => 'attachment'
);

$msg->send or die "Unable to send message: $!";

Он отлично отправляет электронное письмо (с вложением), но не отображает html-контент в теле письма.Это отправка в виде простого текста и присоединение HTML в формате «ATT00001..htm», да, это две точки перед «htm» ...

Что я делаю не так ?? *

1 Ответ

1 голос
/ 27 октября 2011

Ответил на мой вопрос! Заметил, что ВСЕ другие атрибуты хэша были голыми словами, поэтому я снял кавычки с «content-type», и он работает как шарм!

...