Perl的简单,现代,强大,透明的数据结构持久性

Question

我正在寻找一种解决方案来透明地持久化Perl数据结构(甚至不是对象,但对象支持是一个优势)没有循环引用.我对后端并不在乎,但我更喜欢JSON.对象的数量相对较少(几千个hashrefs,每个大约有5个密钥).通过"透明"持久性,我的意思是我不希望每次更新内存数据结构时都必须对存储后端进行更改.

以下是代码理想情况的样子:

my $ds;

...
# load the $ds data structure from 'myfile'

print $ds->{foo}->{bar};  # baz
$ds->{foo}->{bar} = 'quux';

... program dies, but the updated %hash has been persisted automatically in 'myfile'

# in another invocation
print $ds->{foo}->{bar};  # quux

到目前为止,我已经看过了:

• Dave Rolsky的Perl面向对象的持久性模块编译 - 自2003年以来没有更新
• brian d foy的MasteringPerl - 第14章数据序列化 - 谈论DBM :: Deep,一个很好的候选人.我希望序列化和透明持久性之间有更明显的区别.
• 持久 - 自2000年以来没有更新
• SPOPS - 自2004年以来被废弃
• 自2005年起,SLOOPS在CPAN上只有一个版本
• 七巧板 - 看起来也被遗弃了
• Tie :: File :: AsHash执行透明持久性,但仅支持单级哈希
• MooseX :: Storage,Storable和JSON看起来不错,但它们只是序列化,而不是持久性框架
• DBIx :: Class,Class :: DBI,Fey :: ORM,ORM,Rose :: DB是OO-RDBM映射器,我宁愿不使用数据库后端
• DB_File需要BerkeleyDB
• KiokuDB似乎太复杂了

我只发现了一个有前途的模块,DBM :: Deep.代码就像在示例中一样,您可以使用加载数据结构

my $ds = DBM::Deep->new( "myfile.db" );

但格式是二进制格式.这不是一个大问题,因为我可以使用JSON以人类可读的格式导出它.

所以,我错过了一个模块,我是否正确地解决了这个问题？

Answer 1

为了实现"透明度"目标,您将不得不将其抽象到框架中(如chambwez建议的那样)或使用tied变量,这些变量会在更新时将自己保存到磁盘.DBM哈希tie以这种方式使用,所以DBM::Deep可能是你最好的选择; 我所知道的其他一切都要求你明确告诉它何时写出数据和/或以性能名称缓存写入.