blob: 0ddd2a0830ed411e6754a448aba86f184a821716 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
|
Mail::Delivery �� VERPs �б�
$service = new Mail::Delivery {
log_function => $fp,
smtp_log_function => $sfp,
smtp_log_handle => $handle,
};
$service->deliver(
{
'smtp_servers' => $config->{'smtp_servers'},
'smtp_sender' => $config->{'smtp_sender'},
'recipient_maps' => $config->{recipient_maps},
'recipient_limit' => $config->{smtp_recipient_limit},
'message' => $message,
map_params => $config,
# �ǡ�verps ������
# MTA �ΤҤ�Ȥϡ�
use_verp => yes
verp_params => {
styles => {
postfix_style => 'XVERP',
qmail_style => '-@[]',
},
mta_hints => {
server-A => postfix
server-B => qmail
}
},
});
|
