Perl dbmopen 函数
描述
此函数将 EXPR 指定的数据库文件绑定到散列 HASH。 如果数据库不存在，则使用 MODE 指定的模式创建它。 文件 EXPR 应指定不带 .dir 和 .pag 扩展名。 现在不推荐使用 tie 和一个已绑定的 DBM 哈希模块，例如 SDBM_File。
语法
以下是此函数的简单语法 −
dbmopen HASH, EXPR, MODE
返回值
此函数在失败时返回 0，在成功时返回 1。
请注意，keys 和 values 等函数在用于大型 DBM 文件时可能会返回巨大的列表。 您可能更喜欢使用 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);
