<>;print 1e3-eval<>=~s/\d+/(1-$&e-3)*/gr.1e3