print"Question Number $question_number\n";

      foreach $line(@{$$questions{$key}}){
        Games::QuizTaker::IO->out(wrap ("","","$line\n"));
      }

      print"Your Answer: ";
      $answer=Games::QuizTaker::IO->in;
      chomp($answer);

##</code><code>##

Question Number 1
Games::QuizTaker::IOWhat popular operating system was created by a Finnish computer science
student name Linus Torvalds?
Games::QuizTaker::IOA. Unix
Games::QuizTaker::IOB. Minux
Games::QuizTaker::IOC. Linux
Games::QuizTaker::IOD. Windows
Your Answer: