Checking if your kit is complete...
Looks good
Writing Makefile for Class::Publisher
cp lib/Class/Publisher.pm blib/lib/Class/Publisher.pm
Manifying blib/man3/Class::Publisher.3
PERL_DL_NONLAZY=1 /home/cpanrun/pa-risc1.1/build/5.6.1/bin/perl -Iblib/arch -Iblib/lib -I/home/cpanrun/pa-risc1.1/build/5.6.1/lib/5.6.1/PA-RISC1.1-thread-multi -I/home/cpanrun/pa-risc1.1/build/5.6.1/lib/5.6.1 -e 'use Test::Harness qw(&runtests $verbose); $verbose=1; runtests @ARGV;' t/*.t
t/exchange........1..20
ok 1 - require Class::Publisher;
ok 2 - require Telephone;
ok 3 - new phone: not online - exchange not initialised
ok 4 - Telephone::Exchange subscribed to Telephone "connect" event
ok 5 - Telephone::Exchange subscribed to Telephone "disconnect" event
ok 6 - Telephone::Exchange subscribed to Telephone "call" event
ok 7 - Telephone::Exchange subscribed to Telephone "end_call" event
ok 8 - phone now online - exchange is initialised
ok 9 - new phone is online
ok 10 - call to non-existant number failed
ok 11 - exchange caught "call" event
ok 12 - call connected between two phones
ok 13 - cannot call a phone that is engaged
ok 14 - friends phone caught communicate event
ok 15 - test phone caught communicate response
ok 16 - both phones hung up
ok 17 - test phone has no "communicate" subscribers
ok 18 - other phone has no "communicate" subscribers
ok 19
ok 20 - exchange caught disconnect event
ok
t/pod.............1..0 # Skip Test::Pod 1.00 required for testing POD
skipped
        all skipped: Test::Pod 1.00 required for testing POD
t/pod_coverage....1..0 # Skip Test::Pod::Coverage 1.00 required for testing pod coverage
skipped
        all skipped: Test::Pod::Coverage 1.00 required for testing pod coverage
t/publisher.......1..22
Use of uninitialized value in concatenation (.) or string at blib/lib/Class/Publisher.pm line 18.
ok 1 - require Class::Publisher;
ok 2 - add_subscriber requires params
ok 3 - subscriber reference should be a blessed object
ok 4 - subscriber cant be empty string
ok 5 - class->add_subscriber(undef, \&code)
ok 6 - class->get_subscribers()
ok 7 - class->add_subscriber("*", \&code)
ok 8 - class->get_subscribers("*")
ok 9 - class->delete_subscriber(undef, \&code)
ok 10 - object->add_subscriber("*", \&code)
ok 11 - object->get_subscribers("*") inherits class subscribers
ok 12 - class->get_subscribers("*") donesnt inherit object subscribers
ok 13 - subclass->get_subscribers("*") inherit parent class subscribers
ok 14 - subclass->get_subscribers("*") returns specific events too
ok 15 - subclass->get_subscribers("specific_event") does just that
ok 16 - class->add_subscriber("specific_event", Class)
ok 17 - class->notify_subscribers(specific_event) notified "*" as well
ok 18 - class->add_subscriber("specific_event", object)
ok 19 - object subscriber notified via object->update
ok 20 - object subscriber with custom method
ok 21 - object subscriber notified via custom method
ok 22 - object is subscriber, not object/method combo
ok
All tests successful, 2 tests skipped.
Files=4, Tests=42,  3 wallclock secs ( 2.48 cusr +  0.17 csys =  2.65 CPU)
Installing /home/cpanrun/pa-risc1.1/build/5.6.1/lib/site_perl/5.6.1/Class/Publisher.pm
Installing /home/cpanrun/pa-risc1.1/build/5.6.1/man/man3/Class::Publisher.3
Writing /home/cpanrun/pa-risc1.1/build/5.6.1/lib/site_perl/5.6.1/PA-RISC1.1-thread-multi/auto/Class/Publisher/.packlist
Appending installation info to /home/cpanrun/pa-risc1.1/build/5.6.1/lib/5.6.1/PA-RISC1.1-thread-multi/perllocal.pod