I do not understand this failure :-( > PERL_DL_NONLAZY=1 /home/david/cpantesting/perl-5.8.8/bin/perl > "-MExtUtils::Command::MM" "-e" "test_harness(0, 'blib/lib', 'blib/arch')" > t/*.t > t/dedupe.....Use of uninitialized value in addition (+) at > /home/david/cpantesting/perl-5.8.8/.cpan/build/Mail-Sort-20070329-byodnD/blib/lib/Mail/Sort/Dedupe.pm > line 35. > # Failed test 37 in t/dedupe.t at line 45 fail #3 > # t/dedupe.t line 45 is: ok(!$found);
Clearly, the test failures are secondary - the root cause is the undefined value, it makes the comparison on that line not fire so no entries are deleted from the hash. But how can anything there be undefined? Everything is my'd and initialized as far as I can see. I must be blind. -- Experience with Asset Control an asset.
