$hash{'mgr'}{ 'mid-mgmt' => { coderA => {}, coderB => { 'regexp monkey' => {}, }, }, }; ## for quick ref : # /mgr # /mgr/mid-mgmt # /mgr/mid-mgmt/coderA # /mgr/mid-mgmt/coderB # /mgr/mid-mgmt/coderB/regexp monkey #### ## all of the object stuff is gone, this is alg only # $height_of_a_box = font_height + all padding $height = ($height_of_a_box * ($high_keys*$high_depth)); #### +-------+ | mgmt | +-------+ | +----------+ +----| mid-mgmt | +----------+ | +--------+ |----| coderA | | +--------+ | +--------+ +----| coderB | +--------+ | +--------+ +---| monkey | +--------+