$ball->{'x'} += dx $ball->{'y'} += dy