Integrate[Log[x]/x, {x,e,infinity}]