Perl dbmclose 函数

说明

此函数关闭哈希和 DBM 文件之间的绑定。将 tie 函数与合适的模块一起使用。

语法

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

dbmclose HASH

返回值

此函数在失败时返回 0，成功时返回 1。

请注意，在大型 DBM 文件上使用 keys 和 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);