Вот фрагмент из моего 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» ...
Что я делаю не так ?? *