PATH=/usr/bin:/bin Start 2011-01-09T06:14:26 ActivePerl-1003 CPAN-1.9402 Going to read '/home/cpanfly/var/cpan/Metadata' Database was generated on Sat, 08 Jan 2011 22:38:46 GMT Running make for B/BI/BINGOS/Object-Accessor-0.38.tar.gz Checksum for /net/nas/data/cpan/authors/id/B/BI/BINGOS/Object-Accessor-0.38.tar.gz ok Will not use Archive::Tar, need 1.00 Object-Accessor-0.38 Object-Accessor-0.38/CHANGES Object-Accessor-0.38/lib Object-Accessor-0.38/lib/Object Object-Accessor-0.38/lib/Object/Accessor.pm Object-Accessor-0.38/t Object-Accessor-0.38/t/01_Object-Accessor-Subclassed.t Object-Accessor-0.38/t/04_Object-Accessor-lvalue.t Object-Accessor-0.38/t/02_Object-Accessor-allow.t Object-Accessor-0.38/t/06_Object-Accessor-alias.t Object-Accessor-0.38/t/03_Object-Accessor-local.t Object-Accessor-0.38/t/05_Object-Accessor-callback.t Object-Accessor-0.38/t/00_Object-Accessor.t Object-Accessor-0.38/MANIFEST Object-Accessor-0.38/Makefile.PL Object-Accessor-0.38/README Object-Accessor-0.38/META.yml CPAN.pm: Going to build B/BI/BINGOS/Object-Accessor-0.38.tar.gz >>> /home/cpanfly/ap1003/bin/perl-static Makefile.PL Checking if your kit is complete... Looks good Writing Makefile for Object::Accessor >>> make cp lib/Object/Accessor.pm blib/lib/Object/Accessor.pm Manifying blib/man3/Object::Accessor.3 BINGOS/Object-Accessor-0.38.tar.gz make -- OK Running make test >>> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /home/cpanfly/ap1003/bin/perl-static "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/00_Object-Accessor.t ............. ok 1 - use Object::Accessor; ok 2 - Object of 'Object::Accessor' created ok 3 - The object isa Object::Accessor ok 4 - Cannot 'foo' ok 5 - Method 'foo' returns false ok 6 - Warning logged ok 7 - Cannot 'foo' -- dies ok 8 - Method 'foo' returns false ok 9 - Fatal error logged ok 10 - Accessor 'foo' created ok 11 - Can 'foo' ok 12 - No warnings logged ok 13 - 'foo' set to 't/00_Object-Accessor.t' ok 14 - 'foo' still holds 't/00_Object-Accessor.t' ok 15 - Retrieved 'foo' coderef ok 16 - The reference isa CODE ok 17 - 'foo' via coderef holds 't/00_Object-Accessor.t' ok 18 - 'foo' set via coderef to '1' ok 19 - 'foo' still holds '1' ok 20 - 'foo' set to '18993' ok 21 - 'foo' still holds '18993' ok 22 - Retrieved 'foo' coderef ok 23 - The reference isa CODE ok 24 - 'foo' via coderef holds '18993' ok 25 - 'foo' set via coderef to '1' ok 26 - 'foo' still holds '1' ok 27 - Accessors retrieved ok 28 - Accessor 'foo' is valid ok 29 - Only expected accessors found ok 30 - Clone created ok 31 - The object isa Object::Accessor ok 32 - Clone has accessors ok 33 - Only expected accessors found ok 34 - Accessor 'foo' is empty ok 35 - Objects 'foo' has a value ok 36 - Object flushed ok 37 - Objects 'foo' is now empty ok 38 - Cannot 'foo' via other object ok 39 - Method 'foo' returns false ok 40 - Warning logged ok 41 - Object created with accessors ok 42 - The object isa Object::Accessor ok 43 - Object::Accessor->can('foo') 1..43 ok t/01_Object-Accessor-Subclassed.t .. ok 1 - use Object::Accessor; ok 2 - Object created ok 3 - The object isa My::Class ok 4 - The object isa Object::Accessor ok 5 - Accessor 'foo' created ok 6 - Object can 'foo' ok 7 - Objects 'foo' set ok 8 - Objects 'foo' retrieved ok 9 - No sub from non-existing function ok 10 - Code handled it gracefully ok 11 - Calling '18994' on 'My::Class' dies ok 12 - Dies with an informative message 1..12 ok t/02_Object-Accessor-allow.t ....... ok 1 - use Object::Accessor; ok 2 - Object of 'Object::Accessor' created ok 3 - The object isa Object::Accessor ok 4 - Accessor 'foo' created ok 5 - Can 'foo' ok 6 - No warnings logged ok 7 - Proper allow handler stored ok 8 - 'foo' NOT set to 't/02_Object-Accessor-allow.t' ok 9 - 'foo' still holds '' ok 10 - Warnings logged ok 11 - Internal verify fails ok 12 - Warning logged ok 13 - 'foo' set to '18995' ok 14 - 'foo' still holds '18995' ok 15 - No warnings logged ok 16 - Internal verify succeeds ok 17 - No warnings 1..17 ok t/03_Object-Accessor-local.t ....... ok 1 - use Object::Accessor; ok 2 - Object of 'Object::Accessor' created ok 3 - The object isa Object::Accessor ok 4 - Accessor 'foo' created ok 5 - Can 'foo' ok 6 - No warnings logged ok 7 - Testing scoped values ok 8 - Value set to 18996 ok 9 - Value set to t/03_Object-Accessor-local.t ok 10 - Value restored to 18996 1..10 ok t/04_Object-Accessor-lvalue.t ...... ok 1 - use Object::Accessor; ok 2 - Object of 'Object::Accessor::Lvalue' created ok 3 - The object isa Object::Accessor::Lvalue ok 4 - The object isa Object::Accessor ok 5 - Object cloned ok 6 - Accessor 'foo' created ok 7 - lvalue assign successful ok 8 - Accessor 'foo' set ok 9 - Contains proper value ok 10 - Cloned the lvalue object ok 11 - Created accessor 'bar' ok 12 - Got warning about allow handlers ok 13 - Allow handler ignored ok 14 - No error occurred ok 15 - Setting 'bar' worked ok 16 - Cloned the lvalue object ok 17 - Callback not registered ok 18 - Got warning about callbacks 1..18 ok t/05_Object-Accessor-callback.t .... ok 1 - use Object::Accessor; ok 2 - Object created ok 3 - The object isa Object::Accessor ok 4 - Accessor 'foo' created ok 5 - Object::Accessor->can('register_callback') ok 6 - Callback registered ok 7 - Object cloned ok 8 - Direct get returns ok 9 - Direct set is able to set the value ok 10 - Direct get returns 1 ok 11 - Callbacks didn't get called ok 12 - In callback now ok 13 - Object received ok 14 - Object isa Object::Accessor ok 15 - Method is 'foo' ok 16 - Value isa ARRAY ok 17 - This was a GET request ok 18 - Method 'foo' returns '18998' ok 19 - Direct get returns ok 20 - Callback called ok 21 - In callback now ok 22 - Object received ok 23 - Object isa Object::Accessor ok 24 - Method is 'foo' ok 25 - Value isa ARRAY ok 26 - Attempted to set 1 ok 27 - Setting foo ok 28 - Callback called ok 29 - In callback now ok 30 - Object received ok 31 - Object isa Object::Accessor ok 32 - Method is 'foo' ok 33 - Value isa ARRAY ok 34 - This was a GET request ok 35 - Returns 18998 ok 36 - Callback called ok 37 - Direct get returns 18998 ok 38 - Callback not called 1..38 ok t/06_Object-Accessor-alias.t ....... ok 1 - use Object::Accessor; ok 2 - Object created ok 3 - Object isa Object::Accessor ok 4 - Created accessor 'foo' ok 5 - Set value ok 6 - Retrieved value ok 7 - Created alias 'bar' ok 8 - Alias 'bar' exists ok 9 - Alias & original return the same value ok 10 - Changed value using alias ok 11 - Alias & original return the same value ok 12 - Cloned object ok 13 - All accessors cloned ok 14 - Set value ok 15 - Alias & original return the same value ok 16 - Changed value using alias ok 17 - Alias & original return the same value 1..17 ok All tests successful. Files=7, Tests=155, 1 wallclock secs ( 0.03 usr 0.01 sys + 0.32 cusr 0.08 csys = 0.44 CPU) Result: PASS BINGOS/Object-Accessor-0.38.tar.gz make test TEST_VERBOSE=1 -- OK Chris Williams <chris@bingosnet.co.uk> Per object accessors >>> (cd /home/cpanfly/var/cpan/build/Object-Accessor-0.38-9flpBG && tar cvf - Object-Accessor-0.38.ppd blib) | gzip -c >/home/cpanfly/var/REPO/B/BI/BINGOS/Object-Accessor-0.38.tar.gz Object-Accessor-0.38.ppd blib/ blib/lib/ blib/lib/Object/ blib/lib/Object/Accessor.pm blib/man3/ blib/man3/Object::Accessor.3 >>> mv /home/cpanfly/var/cpan/build/Object-Accessor-0.38-9flpBG/Object-Accessor-0.38.ppd /home/cpanfly/var/REPO/B/BI/BINGOS Finished 2011-01-09T06:14:29