On 2010.04.15 18:50, Steve Bertrand wrote:
> Hi all,
> 
> In one of my projects, I've written a test file t/22-upgrade.t.

[..snip..]

> However, when I run "make test", the Perl code for print does not execute.

Replying my own post, this project is currently only used by us internally.

What I've done to 'rectify' the issue so that it is clear that the
config files differ, is rename the test to the highest test number
(999-upgrade.t) so it will run last, and we will run "make test" with
the TEST_VERBOSE=1 flag.

So instead of this:

acct-dev: ISP % sudo make test
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e"
"test_harness(0, 'blib/lib', 'blib/arch')" t/*.t
t/01-use.t ....... ok
t/03-Database.t .. ok
t/04-gui.t ....... ok
t/05-Error.t ..... ok
t/06-Object.t .... ok
t/07-Ledger.t .... ok
t/08-Notes.t ..... ok
t/09-Plans.t ..... ok
t/10-Sanity.t .... ok
t/11-Transac.t ... ok
t/12-User.t ...... ok
t/13-Vars.t ...... ok
t/14-bug17.t ..... ok
t/15-bug18.t ..... ok
t/16-bug37.t ..... ok
t/17-bug48.t ..... ok
t/18-bug49.t ..... ok
t/19-mech.t ...... ok
t/20-bug75.t ..... ok
t/21-audit.t ..... ok
t/22-date.t ...... ok
t/999-upgrade.t .. ok
All tests successful.
Files=22, Tests=642, 44 wallclock secs ( 0.50 usr  0.05 sys + 31.83 cusr
 2.58 csys = 34.96 CPU)
Result: PASS

...I wind up with the last entry where the print statements are very
visible as the tests conclude (in this case, versions don't differ, and
there are no differences in directives):

t/999-upgrade.t ..
ok 1 - Nothing to see here, it's not an upgrade
1..1
ok
All tests successful.
Files=22, Tests=642, 42 wallclock secs ( 0.49 usr  0.15 sys + 30.02 cusr
 2.63 csys = 33.30 CPU)
Result: PASS

.... I'm still reading through the docs, but if someone has any quick
advice on how to make this more granular so I don't have to be extremely
verbose on all tests, that'd be great.

I'd especially like references to CPAN modules that are already doing
things like this (or modules that have other neat Makefile.PL trickery
that I may like).

Cheers,

Steve

-- 
To unsubscribe, e-mail: beginners-unsubscr...@perl.org
For additional commands, e-mail: beginners-h...@perl.org
http://learn.perl.org/


Reply via email to