$in{'key'}というデータを$xx{"key.$in{'id'}"}というデータに直す関数datasetと
それを書き込む関数dbm_wがあって、
両方ともハッシュのリファレンスを渡してやるのですがdatasetはハッシュを返すようになっています。
なので%bufとか適当に経由しないといけないのですが、簡潔に済ませる方法はあるんでしょうか？

%buf = &dataset(\%in);
&dbm_w(\%buf, "chardata");