$ball = new Ball::Soccer; $john = new Person; give $john $ball;