Итак, у меня есть сценарий, на котором я пытаюсь правильно запустить VERP. Он использует MIME :: Lite и postfix в качестве почтового сервера. Вот код:
use strict;
use MIME::Lite;
use LWP::Simple;
use Mail::Verp;
my $email = '[email protected]';
Mail::Verp->separator('+');
my $verp_email = Mail::Verp->encode('[email protected]', $email);
my $content = '<html><body>Hi!</body></html>';
my $msg = MIME::Lite->new(
Subject => 'Hi',
From => '[email protected]',
To => $email,
'Return-Path' => $verp_email,
Type => 'text/html',
Data => $content
);
$msg->send('smtp', 'XXX.XXX.XXX.XXX');
Когда сообщение отброшено, postfix не направляет его в почтовый ящик [email protected]. Как мне направить сообщение так, чтобы отправителем отказа было значение $ verp_email?
Я пытаюсь создать журнал всех отклоненных писем с включенными адресами электронной почты, чтобы затем его можно было отправить в файл или базу данных.
Если кто-нибудь может указать мне в этом правильном направлении, я был бы чрезвычайно признателен. Спасибо.