I am doing some testing under Devel::Cover, and get some weird results sometimes. What should I be looking at in my code or test cases that is provoking this discrepancy?
Without D::C
++++++++++++++++++++++++++++++++++++++++++
[EMAIL PROTECTED] src]$ make test
...
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" ./Invoice/t/*.t ./QualityBakers/t/*.t ./QualityBakers/RecordSet/t/*.t ./WeeklyStatement/t/*.t ./AdjustmentNote/t/*.t
./AdjustmentNote/t/ClaimHeader..........ok
./Invoice/t/AccountSummaryDetail........ok
./Invoice/t/PageHeader1.................ok
./Invoice/t/SummaryDetails..............ok
./Invoice/t/SummaryHeader...............ok
./QualityBakers/RecordSet/t/Iterator....ok
./QualityBakers/t/AnyFile...............ok
./QualityBakers/t/AnyRecord.............ok
./QualityBakers/t/Checkpoint............ok
./QualityBakers/t/DeliveryMethod........ok
./QualityBakers/t/FileSet...............ok
./QualityBakers/t/RecordSet.............ok
./WeeklyStatement/t/ColumnHeader........ok
All tests successful.
Files=13, Tests=170, 7 wallclock secs ( 4.21 cusr + 0.39 csys = 4.60 CPU)
++++++++++++++++++++++++++++++++++++++++++
With D::C
++++++++++++++++++++++++++++++++++++++++++
[EMAIL PROTECTED] src]$ HARNESS_PERL_SWITCHES=-MDevel::Cover make test
...
PERL_DL_NONLAZY=1 /usr/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" ./Invoice/t/*.t ./QualityBakers/t/*.t ./QualityBakers/RecordSet/t/*.t ./WeeklyStatement/t/*.t ./AdjustmentNote/t/*.t
./AdjustmentNote/t/ClaimHeader..........ok
./Invoice/t/AccountSummaryDetail........ok
./Invoice/t/PageHeader1.................ok
./Invoice/t/SummaryDetails..............ok
./Invoice/t/SummaryHeader...............ok
./QualityBakers/RecordSet/t/Iterator....ok
./QualityBakers/t/AnyFile...............ok
./QualityBakers/t/AnyRecord.............ok
./QualityBakers/t/Checkpoint............ok
./QualityBakers/t/DeliveryMethod........ok
./QualityBakers/t/FileSet...............dubious
Test returned status 0 (wstat 11, 0xb)
./QualityBakers/t/RecordSet.............ok 32/0# Looks like your test died just after 32.
./QualityBakers/t/RecordSet.............dubious
Test returned status 255 (wstat 65280, 0xff00)
after all the subtests completed successfully
./WeeklyStatement/t/ColumnHeader........ok
Failed Test Stat Wstat Total Fail Failed List of Failed
-------------------------------------------------------------------------------
./QualityBakers/t/FileSet.t 0 11 ?? ?? % ??
./QualityBakers/t/RecordSet.t 255 65280 32 0 0.00% ??
Failed 2/13 test scripts, 84.62% okay. -22/91 subtests failed, 124.18% okay.
make: *** [test_dynamic] Error 29
++++++++++++++++++++++++++++++++++++++++++
Version info ++++++++++++++++++++++++++++++++++++++++++ [EMAIL PROTECTED] src]$ perl -v
This is perl, v5.8.0 built for i386-linux-thread-multi (with 1 registered patch, see perl -V for more detail)
++++++++++++++++++++++++++++++++++++++++++
[EMAIL PROTECTED] src]$ perl -MDevel::Cover -e 'print Devel::Cover->VERSION()'
Devel::Cover 0.50: Collecting coverage data for branch, condition, statement, subroutine and time.
Pod coverage is unvailable. Please install Pod::Coverage from CPAN.
Selecting packages matching:
Ignoring packages matching:
/Devel/Cover[./]
^t/
\.t$
^test\.pl$
Ignoring packages in:
.
/usr/lib/perl5/5.8.0
/usr/lib/perl5/5.8.0/i386-linux-thread-multi
/usr/lib/perl5/site_perl
/usr/lib/perl5/site_perl/5.8.0
/usr/lib/perl5/site_perl/5.8.0/i386-linux-thread-multi
/usr/lib/perl5/vendor_perl
/usr/lib/perl5/vendor_perl/5.8.0
/usr/lib/perl5/vendor_perl/5.8.0/i386-linux-thread-multi
Devel::Cover: Can't find file "../../lib/Storable.pm": ignored.
Devel::Cover: Can't find file "-e": ignored.
0.50Devel::Cover: Writing coverage database to /home/le6303/work/GoodmanFielder.QualityBakers/src/cover_db/runs/1106198896.7448.54982
----------------------------------- ------ ------ ------ ------ ------ ------
File stmt branch cond sub time total
----------------------------------- ------ ------ ------ ------ ------ ------
Total n/a n/a n/a n/a n/a n/a
----------------------------------- ------ ------ ------ ------ ------ ------
++++++++++++++++++++++++++++++++++++++++++ [EMAIL PROTECTED] src]$ perl -MTest::More -e 'print Test::More->VERSION()' 0.47
-- Leif Eriksen Snr Developer http://www.hpa.com.au/ phone: +61 3 9217 5545 email: [EMAIL PROTECTED]
