Tengo un script de Perl donde mantengo un caché muy simple usando una tabla hash. Me gustaría borrar el hash una vez que ocupa más de n bytes, para evitar que Perl (32 bits) se quede sin memoria y se bloquee.

Puedo hacer una verificación del número de pares clave-valor:

if (scalar keys %cache > $maxSize)
 {
 %cache = ();
 }

¿Pero es posible verificar la memoria real ocupada por el hash?