Checking if your kit is complete... Looks good Writing Makefile for Sub::Context cp lib/Sub/Context.pm blib/lib/Sub/Context.pm Manifying blib/man3/Sub::Context.3 PERL_DL_NONLAZY=1 /home/cpanrun/tmp/5.10.0/bin/perl "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib/lib', 'blib/arch')" t/*.t t/0-signature.....1..1 WARNING: This key is not certified with a trusted signature! Primary key fingerprint: DF05 D93D BEA3 9DD2 4A44 CD66 05DF 169F 5C08 E9C4 ok 1 - Valid signature ok t/basic...........1..18 ok 1 - use Sub::Context; ok 2 - main->can('foo') ok 3 - should detect and dispatch in void context ok 4 - should respect list context ok 5 - ... and should return correct order ok 6 - should detect and dispatch in scalar context ok 7 - NotMain->can('bar') ok 8 - import should only pollute calling package namespace ok 9 - should throw exception with unexpected context ok 10 - should not attempt to call a non-sub ok 11 - ... warning with custom message, if necessary ok 12 - not overwriting existing scalar ok 13 - ... hash ok 14 - ... or array ok 15 - ... nor original sub ok 16 - should wrap around existing sub for context ok 17 - should call passed subref ok 18 - import() should warn with bad type request ok t/pod-coverage....1..0 # Skip Test::Pod::Coverage 1.04 required for testing POD coverage skipped all skipped: Test::Pod::Coverage 1.04 required for testing POD coverage t/pod.............1..1 ok 1 - blib/lib/Sub/Context.pm ok t/subs............1..38 ok 1 - use Sub::Context; ok 2 - Sub::Context->can('_qualify_sub') ok 3 - _qualify_sub() should find sub in given package name, _qualifying it ok 4 - ... or should find sub given fully-qualified name ok 5 - ... even if sub does not exist ok 6 - Sub::Context->can('_find_glob') ok 7 - _find_glob() should find named glob ok 8 - ... even if it does not exist yet ok 9 - Sub::Context->can('_validate_contexts') ok 10 - _validate_contexts() should die given invalid context ok 11 - ... but should live otherwise ok 12 - Sub::Context->can('_fetch_glob') ok 13 - _fetch_glob() should not copy CODE slot ok 14 - ... but should copy other slots ok 15 - ... unmodified ok 16 - ... and should return new glob if it does not exist ok 17 - Sub::Context->can('_contexts') ok 18 - _contexts() should return available contexts ok 19 - Sub::Context->can('_generate_contexts') ok 20 - _generate_contexts() should add fallback contexts ok 21 - ... for the given contexts ok 22 - ... default throwing an exception, with no sub defined ok 23 - ... default throwing an exception, with no sub defined ok 24 - ... default throwing an exception, with no sub defined ok 25 - ... or setting fallback to defined sub ok 26 - ... pointing all unused contexts at wrapped subroutine if it exists ok 27 - ... but not overwriting existing wrap ok 28 - ... not allowing scalar references ok 29 - ... not allowing array references ok 30 - ... and not allowing hash references ok 31 - Sub::Context->can('_apply_contexts') ok 32 - _apply_contexts() should populate glob with a sub ok 33 - ... doing the right thing in void context ok 34 - ... in scalar context ok 35 - ... and in list context ok 36 - Sub::Context->can('_default_sub') ok 37 - _default_sub() should return named subref if it exists ok 38 - ... or a default croaking sub ok All tests successful, 1 test skipped. Files=5, Tests=58, 1 wallclock secs ( 0.47 cusr + 0.25 csys = 0.72 CPU) Installing /home/cpanrun/build/5.10.0/html/site/lib/Sub/Context.html Installing /home/cpanrun/build/5.10.0/site/lib/Sub/Context.pm Installing /home/cpanrun/build/5.10.0/site/man/man3/Sub::Context.3 Appending installation info to /home/cpanrun/build/5.10.0/lib/perllocal.pod