PATH=/usr/bin:/bin Start 2011-06-17T12:29:05 ActivePerl-1400 CPAN-1.9402 Going to read '/Users/fly1400/var/cpan/Metadata' Database was generated on Thu, 16 Jun 2011 18:27:47 GMT Running make for C/CH/CHROMATIC/UNIVERSAL-can-1.20110614.tar.gz Checksum for /net/nas/data/cpan/authors/id/C/CH/CHROMATIC/UNIVERSAL-can-1.20110614.tar.gz ok UNIVERSAL-can-1.20110614 UNIVERSAL-can-1.20110614/README UNIVERSAL-can-1.20110614/Changes UNIVERSAL-can-1.20110614/LICENSE UNIVERSAL-can-1.20110614/dist.ini UNIVERSAL-can-1.20110614/t UNIVERSAL-can-1.20110614/t/bugs.t UNIVERSAL-can-1.20110614/META.yml UNIVERSAL-can-1.20110614/MANIFEST UNIVERSAL-can-1.20110614/t/class.t UNIVERSAL-can-1.20110614/t/object.t UNIVERSAL-can-1.20110614/t/00-load.t UNIVERSAL-can-1.20110614/Makefile.PL UNIVERSAL-can-1.20110614/t/bad-input.t UNIVERSAL-can-1.20110614/t/SUPER-can.t UNIVERSAL-can-1.20110614/t/always_warn.t UNIVERSAL-can-1.20110614/t/deep-recursion.t UNIVERSAL-can-1.20110614/lib/UNIVERSAL UNIVERSAL-can-1.20110614/lib/UNIVERSAL/can.pm UNIVERSAL-can-1.20110614/t/lib/Test UNIVERSAL-can-1.20110614/t/lib/Test/SmallWarn.pm UNIVERSAL-can-1.20110614/t/isa-triggering-overload.t CPAN.pm: Going to build C/CH/CHROMATIC/UNIVERSAL-can-1.20110614.tar.gz >>> /Users/fly1400/bin/perl Makefile.PL Checking if your kit is complete... Looks good Writing Makefile for UNIVERSAL::can Writing MYMETA.yml >>> make cp lib/UNIVERSAL/can.pm blib/lib/UNIVERSAL/can.pm Manifying blib/man3/UNIVERSAL::can.3 CHROMATIC/UNIVERSAL-can-1.20110614.tar.gz make -- OK Running make test >>> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /Users/fly1400/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t # Testing UNIVERSAL::can 1.20110614, Perl 5.014000, /Users/fly1400/bin/perl t/00-load.t .................. 1..3 ok 1 - use UNIVERSAL::can; ok 2 - UNIVERSAL::can() should not export can() ok 3 - .. but should export it when requested ok t/always_warn.t .............. 1..2 ok 1 - use UNIVERSAL::can; ok 2 - -always_warn flag should make module always warn ok t/bad-input.t ................ 1..23 ok 1 - use UNIVERSAL::can; ok 2 - (undef) should be false ok 3 - ... and not throw a warning ok 4 - should be false ok 5 - ... and not throw a warning ok 6 - SCALAR(0x100813e70) should be false ok 7 - ... and not throw a warning ok 8 - HASH(0x10082ee60) should be false ok 9 - ... and not throw a warning ok 10 - ARRAY(0x100803cb0) should be false ok 11 - ... and not throw a warning ok 12 - 0 should be false ok 13 - ... and not throw a warning ok 14 - CODE(0x100813f18) should be false ok 15 - ... and not throw a warning ok 16 - *test::FH should be false ok 17 - ... and not throw a warning ok 18 - -1 should be false ok 19 - ... and not throw a warning ok 20 - 0.003 should be false ok 21 - ... and not throw a warning ok 22 - . should be false ok 23 - ... and not throw a warning ok t/bugs.t ..................... ok 1 - use UNIVERSAL::can; ok 2 - unloaded class should not be able to can() ok 3 - ... and should not warn 1..3 ok t/class.t .................... 1..16 ok 1 - use UNIVERSAL::can; ok 2 - can() should return true for defined class methods ok 3 - ... returning a code reference ok 4 - ... the correct code reference ok 5 - calling UNIVERSAL::can() as function on invocant should warn ok 6 - UNIVERSAL::can() should return true then too ok 7 - ... returning a code reference ok 8 - ... the correct code reference ok 9 - can() should return true for methods called as class methods ok 10 - ... and false for nonexistant methods ok 11 - calling UNIVERSAL::can() as function on class name invocant should warn ok 12 - ... but only with warnings enabled ok 13 - ... and not with warnings diabled for UNIVERSAL::can ok 14 - can() should return true for class can() method ok 15 - ... returning a code reference ok 16 - ... the correct code reference ok t/deep-recursion.t ........... 1..1 ok 1 - Didn't segfault ok t/isa-triggering-overload.t .. 1..3 ok 1 - ->can should return true for an existing method ok 2 - ->can should return false for a non-existent method ok 3 - it should not trigger the string overload on the invocant in either case ok t/object.t ................... 1..6 ok 1 - use UNIVERSAL::can; ok 2 - UNIVERSAL::can() should return a true value, if possible ok 3 - ... a code ref, if possible ok 4 - ... or undef if not ok 5 - ... the proper code ref ok 6 - ... not eating any exceptions already thrown ok t/SUPER-can.t ................ 1..2 ok 1 - CLASS->SUPER::can(METHOD) does not give a warning ok 2 - CLASS->SUPER::can(METHOD) does not invoke CLASS->can(METHOD) ok All tests successful. Files=9, Tests=59, 1 wallclock secs ( 0.05 usr 0.02 sys + 0.26 cusr 0.05 csys = 0.38 CPU) Result: PASS CHROMATIC/UNIVERSAL-can-1.20110614.tar.gz make test TEST_VERBOSE=1 -- OK chromatic <chromatic@wgz.org> work around buggy code calling UNIVERSAL::can() as a function >>> (cd /Users/fly1400/var/cpan/build/UNIVERSAL-can-1.20110614-UBACdj && tar cvf - UNIVERSAL-can-1.20110614.ppd blib) | gzip -c >/Users/fly1400/var/REPO/C/CH/CHROMATIC/UNIVERSAL-can-1.20110614.tar.gz UNIVERSAL-can-1.20110614.ppd blib/ blib/lib/ blib/lib/UNIVERSAL/ blib/lib/UNIVERSAL/can.pm blib/man3/ blib/man3/UNIVERSAL::can.3 >>> mv /Users/fly1400/var/cpan/build/UNIVERSAL-can-1.20110614-UBACdj/UNIVERSAL-can-1.20110614.ppd /Users/fly1400/var/REPO/C/CH/CHROMATIC Finished 2011-06-17T12:29:08