perl_hash: cleanup