无涯教程-Perl - dbmopen函数

描述

此函数将 EXPR 指定的数据库文件绑定到哈希 HASH 。如果数据库不存在,则使用 MODE 指定的模式创建数据库。文件 EXPR 的扩展名应不含.dir和.pag。现在不赞成使用领带,而是使用领带DBM哈希模块之一,例如 SDBM_File 。

语法

以下是此函数的简单语法-

dbmopen HASH, EXPR, MODE

返回值

如果失败,此函数返回0,如果成功,则返回1。

请注意,在大型DBM文件上使用键和 values 之类的函数时,可能会返回巨大的列表。您可能更喜欢使用each函数来迭代大型DBM文件。

例

以下是显示其基本用法的示例代码-

#!/usr/bin/perl

# 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);

参考链接

https://www.learnfk.com/perl/perl-dbmopen.html