$verbose and warn "found " . @root . " root nodes: " . join(" ", @root[0 .. (@root < 8 ? @root : 8) - 1]);