Question - Container for question 'n' answer.

	Designed to be used within L<Quiz> module.

	Object creator:

	my $q = Question->new('2 + 2', '4');

	my $qstn = $q->question;

	my $ans = $q->answer;

	Prompt for the question:

	print $q->ask('What is..: ');		

	Sets guessed time, and inputs guess into question.

	my $guess = $q->guess('4');

	Returns status of answer (correct or incorrect).

	print "yeeha!\n" if $q->correct;

	Simple print out of stats for question.

	print $q->results;

	Compare given guess with correct answer.

	my $result = $q->compare(4);