Integrate[(e^-x*Sin[x]/x),{x,0,Infinity}