Perl dbmopen 函数 - 菜鸟教程

描述

dbmopen 将EXPR指定的数据库文件绑定到哈希HASH中。如果数据库不存在，则使用MODE指定的模式创建数据库。文件EXPR的扩展名不得为.dir和.pag。现在不建议使用tie，而推荐使用tie和其中一个捆绑的DBM哈希模块，例如SDBM_File。

句法

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


dbmopen HASH, EXPR, MODE

返回值

如果失败，此函数返回0，如果成功，则返回1。请注意，在大型DBM文件上使用键和值之类的功能时，它们可能会返回巨大的列表。您可能更喜欢使用each函数来迭代大型DBM文件。

示例

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

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