如何在Perl中找到哈希占用的物理内存量？

I have a Perl script where I maintain a very simple cache using a hash table. I would like to clear the hash once it occupies more than n bytes, to avoid Perl (32-bit) running out of memory and crashing. I have a Perl script where I maintain a very si