$lhs = join '_', $mothers[$depth], $mother ? $mothers[$depth-1] : $aunties[$depth];