blob: 2df018e3706b41230c9f9f0eee6a19562845fa0a (
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
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
|
=head1 NAME
fml5 �Υ�����������ƥ�ˤĤ���
=head1 DESCRIPTION
=head2 fml4 �� fml5 �������
fml5 �κ������Ū�ΰ�Ĥϡ����С��ꥹ�Ȥμ����������������ݲ���
����Netlib::SMTP �ϼ��Τ褦�˻Ȥ��ޤ���
=head1 �Ȥ���
=head2 Netlib::* ���饹�λȤ����ˤĤ���
Netlib::* ��°���륯�饹�� SMTP ����� LMTP �����ؤΥ����ե�������
���ޤ���
Netlib::SMTP �ϼ��Τ褦�˻Ȥ��ޤ���
use Netlib::SMTP;
my $service = new Netlib::SMTP {
log_function => $fp,
socket_timeout => 2,
};
my $ref_to_array = [ 'kenken@nuinui.net' ];
my $recipient_maps = 'file:/var/spool/ml/elena/actives';
$service->deliver(
{
'mta' => 'localhost:25',
'smtp_sender' => 'rudo@nuinui.net',
'recipient_array' => $ref_to_array,
'recipient_maps' => $recipient_maps,
'header' => $header,
'body' => $body,
});
if ($service->error) { Log($service->error); return;}
������ $header �ϥإå��ǡ�FML::Header ���֥������ȤǤ���
������ $body �ϥ����ʸ�ǡ�FML::Body ���֥������ȤǤ���
=head1 ����ݡ��ͥ��
Netlib::SMTP >-|
|- Netlib::Utils
|- Netlib::INET4 >--- Socket
|- Netlib::INET6 >--- Socket
| |- Socket6
|
|- FML::IO::Map
|
|- IO::Socket
Netlib::SMTP uses Netlib::Utils, Netlib::INET4 and Netlib::INET6.
Netlib::SMTP also uses FML::IO::Map to resolve $recipient_maps
operations.
=head1 ����
L<"Netlib::SMTP">,
L<"FML::IO::Map">
=head1 AUTHOR
Ken'ichi Fukamachi
=head1 COPYRIGHT
Copyright (C) 2001 Ken'ichi Fukamachi
All rights reserved. This program is free software; you can
redistribute it and/or modify it under the same terms as Perl itself.
=head1 HISTORY
Netlib class appeared in fml5.
fml5 is fully rewrite of fml4 based on the experience of fml4
(1993-2001).
|