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