当前位置：文江博客话题详情

如何查看 Berkeley DB (Perl) 中有多少个键？

发布于 2024-10-04 23:47:00 字数 284 浏览 7 评论 0原文

我只需要找出这个哈希中有多少个元素，我正在查看文档，但唯一可能给我的是 db_stat，并且它下面有一个 TODO。

http://search.cpan.org/dist/BerkeleyDB/BerkeleyDB.pod#Using_db_stat

那么除了创建游标并解析整个内容之外，我怎样才能看到哈希中有多少个键呢？

原文

分享到QQ

分享到微博

如果你对这篇内容有疑问，欢迎到本站社区发帖提问参与讨论，获取更多帮助，或者扫码二维码加入 Web 技术交流群。

发布评论

需要登录才能够评论，你可以免费注册一个本站的账号。

暮色兮凉城 2024-10-11 23:47:01

似乎在这里找到了答案：

http://download .oracle.com/docs/cd/E17076_02/html/api_reference/C/dbstat.html

命名调用 db_stat 时设置的许多不同变量，包括我正在寻找的“hash_ndata”，它给出了数字键值对。

回复收藏 0 原文

不顾 2024-10-11 23:47:01

您可以将 bdb 数据库绑定到哈希，然后检查哈希中键的数量。在标量上下文中使用时，keys 函数将为您提供哈希中的键数。

use DB_File;
our %dbHash;

yadda, yadda, yadda;
tie (%dbHash, "DB_File", $dbFileName);
print "The number of keys in $dbFileName is " . keys(%dbHash) . "\n";

不幸的是，我无法测试这个，因为我的系统上没有 dbd。我相信您必须使用包变量来处理tie。

You can tie a bdb database to a hash, then check the number of keys in the hash. The keys function will give you the number of keys in a hash when used in a scalar context.

use DB_File;
our %dbHash;

yadda, yadda, yadda;
tie (%dbHash, "DB_File", $dbFileName);
print "The number of keys in $dbFileName is " . keys(%dbHash) . "\n";

Unfortunately, I can't test this because I don't have dbd on my system. I believe you have to use package variables for handling the tie.

回复收藏 0 原文

~没有更多了~