blob: f2233c93ac26536af5bed1cf5c89578751f80c15 (
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
|
<!--
$FML: IO::Adapter.sgml,v 1.3 2002/04/01 23:41:05 fukachan Exp $
-->
<chapter id="module.io.adapter">
<title>
IO::Adapter
</title>
<sect1>
<title>
IO �ؤΥ����ץ����� (IO::Adapter)
</title>
<para>
&fmldevel; �ǤΥ��С��ꥹ�Ȥ��ɤ߽�
IO::Adapter �Ȥ�����ݥ��饹���̤��ơ�
���ɥ쥹����Ͽ/�����Ԥʤ��褦�ˤʤäƤ��ޤ���
</para>
<para>
�㤨�м��Τ褦�˻ȤäƤ��ޤ���
<screen>
use IO::Adapter;
$obj = new IO::Adapter ($map, $map_params);
$obj->open || croak("cannot open $map");
while ($x = $obj->getline) { ... }
$obj->close;
</screen>
������ $map �ϼ��Τ褦�ʤ�Τ��Ȥ��ޤ���
<screen>
file:/var/spool/ml/elena/actives
unix.group:root
nis.group:root
mysql:id
postgresql:id (̤����)
ldap:id (̤����)
</screen>
</para>
<para>
file: ���̾�Υե�����Ǥ���
unix.group:root �� /etc/group �� root �Υ���ȥ�ˤ���桼���Υꥹ�Ȥ�
nis.group:root �� NIS �� root �Υ���ȥ�ˤ���桼���Υꥹ�ȤǤ���
</para>
<para>
mysql:id �� MySQL �ؤΥ��������Ǥ���
mysql:id �ǻ��ꤵ�줿�ѥ������Ѥ��ޤ���
���Υѥ����� new() ��¹Ԥ���ݤ�����Ϳ����ɬ�פ�����ޤ���
<screen>
my $map = 'mysql:toymodel';
my $map_params = {
$map => {
sql_server => 'localhost',
user => 'fukachan',
user_password => 'uja',
database => 'fml',
table => 'ml',
params => {
ml_name => 'elena',
file => 'members',
},
},
};
my $obj = new IO::Adapter ($map, $map_params);
$obj->open();
$obj->add( 'rudo@nuinui.net' );
$obj->close();
</screen>
</para>
</sect1>
</chapter>
|
