bah, there are still memory leaks, I think.

$data{'moo'}{'test'} = { a => 1, b => 2 };

# The following line doesn't free the tied hash
# containing a => 1, b => 2 until %data is untied.
$data{'moo'}{'test'} = 'foo';
[download]