key-val store としてつかうKiokuDB は簡単な key-val store としてつかえます。use Modern::Perl; use Test::More tests => 1; use lib 'lib'; use Person; use KiokuDB; # sqlite に保存してみる my $d = KiokuDB->connect( "dbi:SQLite:dbname=keyval.db", create => 1, ); my $s = $d->new_scope; # 保存したいオブジェクト my $my_object = Person->new( name => 'acotie', nakigoe => 'おうっふー', ); # 保存 my $uuid = $d->store($my_object); # とりだす my $acotie = $d-