Does anyone now a function that can calculate a string like this

Ans = Calc("3*2+6^1-6/69.2*(6+4^(-1))")

I can write it myself I think, but It'll be a whole lot of work so if anyone nows of such a function, has it or even wrote it hisself, can you please give it to me.