|Perl: the Markov chain saw|
How to export subs in a bin/script for testing in t/00.tby leocharre (Priest)
|on Feb 26, 2010 at 15:30 UTC||Need Help??|
leocharre has asked for the
wisdom of the Perl Monks concerning the following question:
I have a small package that's just a command- it just contains a bin/script- a makefile, a readme, etc. The bin/script defines subroutines. I want to test these subroutines.
The usual kill here, is to move the subs into lib/Module.pm.
And t/00.t will use lib './lib' and test out subs in Module.pm. great.
What if I don't want to move subs from bin/script into lib/Module.pm for testing?
How can I use bin/script's subroutine definitions to use inside t/00.t, without running bin/script entirely??? I thought of maybe declaring a package inside bin/script, aside of main. But then, main will still run. Makes sense.
( Pseudo code follows.. This is an example bin/script )
Great. I need to test make_fun_of() in my t/00.t ..
Obviously, this is not going to work. So, how can I code bin/script in a way that allows it to.. I suppose optionally act a perl lib. Ideally, this would be done by declaring a separate package inside bin/script, one that's not in main. And t/00.t would somehow call that, and ignore main inside bin/script.. ??? (Sorry about the verbosity- I'm having difficulty asking the question.)
My main interest is that I want to keep the code in this one file, but I also want to test parts of it. Is this too greedy on my part and should I just forget it ( as in this is a waste of time ) ?