Beefy Boxes and Bandwidth Generously Provided by pair Networks
Pathologically Eclectic Rubbish Lister

Re^2: Writing a module test

by TStanley (Canon)
on Jun 09, 2007 at 21:00 UTC ( #620217=note: print w/replies, xml ) Need Help??

in reply to Re: Writing a module test
in thread Writing a module test

I decided the Test::MockObect route was the easier way to go (I couldn't get Test::Expect and its dependencies to complile on my Windows system, and jcwren's system already had T::MO installed)

That said, I implemented the Games::QuizTaker:IO module and inserted it into the test section, so that it looks like the following:
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);
Well, the in method works fine, the out method has a slight problem. When I run a simple test script inside my development folder, this is what I get for output:
Question Number 1 Games::QuizTaker::IOWhat popular operating system was created by a Fin +nish computer science student name Linus Torvalds? Games::QuizTaker::IOA. Unix Games::QuizTaker::IOB. Minux Games::QuizTaker::IOC. Linux Games::QuizTaker::IOD. Windows Your Answer:
Any suggestions?

I figured it out. I changed the call from Games::QuizTaker::IO->out to Games::QuizTaker::IO::out. That got rid of the module name in front of the answers. Now to get the test working :-)

People sleep peaceably in their beds at night only because rough men stand ready to do violence on their behalf. -- George Orwell

Log In?

What's my password?
Create A New User
Node Status?
node history
Node Type: note [id://620217]
and the web crawler heard nothing...

How do I use this? | Other CB clients
Other Users?
Others surveying the Monastery: (5)
As of 2016-09-29 20:23 GMT
Find Nodes?
    Voting Booth?
    Extraterrestrials haven't visited the Earth yet because:

    Results (560 votes). Check out past polls.