DSolve[Derivative[1][y][x] == (Log[x] - Log[Log[y[x]]])^2*y[x],y[x],x]