http://www.perlmonks.org?node_id=1015808


in reply to how to use "delete" with a hash of hash

The code posted by muba is working correctly. I don't know what is the problem with your code. You can use his.