$%+=$x+=y/S//for<>=~/.*?ing/g;print$%