Initial cut of a short perl quiz.