Tie :: LevelDB发生了什么？它会自动压缩数据库吗？

Question

我正在使用随机创建的数据库

测试Tie::LevelDB

tie my %hash, 'Tie::LevelDB', "/run/shm/testdb";
for ( 1 .. 10000 )
{
    my $key = '/123/' x 55 . $_;
    my $val = { 
        ctime => 123,
        mtime => 123
    };

    $hash{$key} = freeze ($val);
} 

say $_ for keys %hash;

脚本完成后，我检查了/run/shm/testdb的磁盘空间，总共3.3 MB。

然后我注释了for ( 1 .. 10000 )循环，只执行了say部分，我再次检查了testdb文件夹，现在只需要156 KB！

很奇怪，对吗？有人可以向我解释一下吗？我没有遭受数据丢失。