- dbmopen HASH,DBNAME,MASK
-
[This function has been largely superseded by the
tiefunction.][�����勰�∽�違�壔��
tie��∽�違� 紊с����������ｃ�☖撮�����������障��������]This binds a dbm(3), ndbm(3), sdbm(3), gdbm(3), or Berkeley DB file to a hash. HASH is the name of the hash. (Unlike normal
open, the first argument is not a filehandle, even though it looks like one). DBNAME is the name of the database (without the .dir or .pag extension if any). If the database does not exist, it is created with protection specified by MASK (as modified by theumask). To prevent creation of the database if it doesn't exist, you may specify a MODE of 0, and the function will return a false value if it can't find an existing database. If your system supports only the older DBM functions, you may make only onedbmopencall in your program. In older versions of Perl, if your system had neither DBM nor ndbm, callingdbmopenproduced a fatal error; it now falls back to sdbm(3).dbm(3), ndbm(3), sdbm(3), gdbm(3) �����＜�ゃ�˨�障���� Berkeley DB �����＜�ゃ�˨����ｆ�渇�������̥����割�������障����� HASH ��壔�������勰�ｆ�渇�������勐�������с����� (��勰�����
open�����奝����ｃ�⓾����������勐����違� �����＜�ゃ�˨����潟����� ��с�壔�������障�����; ��障�����篌若����������ŝ����勉�с�����)��� DBNAME ��壔�������若�帥����若�鴻�勐�������с�� (��≦宍絖���� .dir ��� .pag ��壔����������ｃ�⓾�� ��ゃ����障�����)��� �����若�帥����若�鴻��絖���������ŝ�������違��MODE MASK (���umask�� 篆勖③������������) ��ф��絎������������≪�若����т����������障����� 絖���������ŝ����������˨����若�帥����若�鴻��篏���������ŝ����������˨�������˨�壔��MODE ��� 0 ��� 荐㊤����с����������若�帥����若�鴻��荀���ゃ����������ŝ����ｃ����翫����奝�∽�違�壠�純��菴������障����� �𡉴�� DBM ��∽�違�勉�帥����泣����若�������⓾�������激�鴻�������с�壔�������㏍�違�í��筝㏍�� 1 綺⓾�����dbmopen���絎�茵������������������с����障����� �����勉����若�吾�с�潟�� Perl ��с�壔��DBM ��� ndbm ��������ｃ�⓾����ŝ����激�鴻�������с�壔��dbmopen�����若�喝�冴����◑�翫�順�������í�若�˨�ŝ����障��; �憜����с�� sdbm(3) ��˨����í�若�˨�������壔����障�����If you don't have write access to the DBM file, you can only read hash variables, not set them. If you want to test whether you can write, either use file tests or try setting a dummy hash entry inside an
evalto trap the error.DBM �����＜�ゃ�˨��絲障����⓾����吾��莨若�炊┤�����＜����������˨�壔����������激� ���������茯㏍�帥����������������������с�����荐㊤����������������壔�с����障�������� ��吾����������⓾�����茯帥�鴻�������翫����˨�壔�������＜�ゃ�˨����鴻�� 羲�膊�絖����篏帥�������������í�若�������í��������������������
eval��勌賢��с�� ��������若�勉�������激�ャ����潟����ŝ��荐㊤�������⓾�帥����������˨�ŝ����障�����Note that functions such as
keysandvaluesmay return huge lists when used on large DBM files. You may prefer to use theeachfunction to iterate over large DBM files. Example:紊с����� DBM �����＜�ゃ�˨����宴����������˨�壔��
keys���values��勉�������ʒ�∽�違�壔��綏�紊с�ŝ�ŝ�鴻�����菴������障����� 紊с����� DBM �����＜�ゃ�˨�с�壔��each��∽�違��篏帥�ｃ�☎弘���菴������� 茵���ŝ�ｃ����鴻����壔����������������障�������� 箴�:# print out history file offsets dbmopen(%HIST,'/usr/lib/news/history',0666); while (($key,$val) = each %HIST) { print $key, ' = ', unpack('L',$val), "\n"; } dbmclose(%HIST);See also AnyDBM_File for a more general description of the pros and cons of the various dbm approaches, as well as DB_File for a particularly rich implementation.
罕������� dbm ���羈����絲障�������ñ�号����鴻�̹�≪�����������筝���㋜����ʃ��菴違������� ��鴻�˨�ŝ�������ɱ��茖���с����� DB_File ��̹�≪����⓾� AnyDBM_File ��������с����⓾��������������
You can control which DBM library you use by loading that library before you call
dbmopen:dbmopen�����若�喝�冴�������˨�í�ゃ����í�ŝ�� 茯㏍�粋昭�����������с����í�� DBM ��í�ゃ����í�ŝ��篏帥����������九勝��с����障��:use DB_File; dbmopen(%NS_Hist, "$ENV{HOME}/.netscape/history.db") or die "Can't open netscape history file: $!";Portability issues: "dbmopen" in perlport.
腱紙����с�勐�馹�: "dbmopen" in perlport���