ref @$tree[$i]->{subtree}[0] eq "HASH"