Checking if your kit is complete... Looks good Writing Makefile for WWW::Slides Microsoft (R) Program Maintenance Utility Version 7.10.3077 Copyright (C) Microsoft Corporation. All rights reserved. cp lib/WWW/Slides/Controller/UDP.pm blib\lib\WWW\Slides\Controller\UDP.pm cp lib/WWW/Slides.pm blib\lib\WWW\Slides.pm cp lib/WWW/Slides/Client/TCP.pm blib\lib\WWW\Slides\Client\TCP.pm cp lib/WWW/Slides/Controller/Multiple.pm blib\lib\WWW\Slides\Controller\Multiple.pm cp lib/WWW/Slides/Controller.pm blib\lib\WWW\Slides\Controller.pm cp lib/WWW/Slides/Controller/Single.pm blib\lib\WWW\Slides\Controller\Single.pm cp lib/WWW/Slides/BasicLogger.pm blib\lib\WWW\Slides\BasicLogger.pm cp lib/WWW/Slides/Talk.pm blib\lib\WWW\Slides\Talk.pm cp lib/WWW/Slides/Controller/STDIO.pm blib\lib\WWW\Slides\Controller\STDIO.pm cp lib/WWW/Slides/Attendee.pm blib\lib\WWW\Slides\Attendee.pm cp lib/WWW/Slides/SlideShow.pm blib\lib\WWW\Slides\SlideShow.pm cp lib/WWW/Slides/Controller/TCP.pm blib\lib\WWW\Slides\Controller\TCP.pm cp lib/WWW/Slides/Client/Base.pm blib\lib\WWW\Slides\Client\Base.pm cp lib/WWW/Slides/SlideTracker.pm blib\lib\WWW\Slides\SlideTracker.pm Microsoft (R) Program Maintenance Utility Version 7.10.3077 Copyright (C) Microsoft Corporation. All rights reserved. C:\cpanrun\build\5-10-0\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib\lib', 'blib\arch')" t/00.load.t t/pod.t t/Attendee/00.load.t t/Attendee/01.create.t t/Attendee/02.transition.t t/Attendee/03.ping.t t/Attendee/04.handle_input.t t/BasicLogger/00.load.t t/BasicLogger/01.create.t t/BasicLogger/02.default.t t/BasicLogger/03.stdout.t t/BasicLogger/04.fake.t t/Client/00.load.t t/Client/01.create.t t/Client/02.traffic.t t/Client/03.get_commands.t t/Client/50.load-TCP.t t/Client/51.create.t t/Client/52.traffic.t t/Controller/000.load.t t/Controller/001.create.t t/Controller/002.balks.t t/Controller/003.tolerates.t t/Controller/004.execute.t t/Controller/050.Single.load.t t/Controller/051.Single.create.t t/Controller/052.Single.selector.t t/Controller/053.Single.is_alive.t t/Controller/054.Single.owns.t t/Controller/055.Single.output.t t/Controller/056.Single.shut_down.t t/Controller/057.Single.execute.t t/Controller/100.Multiple.load.t t/Controller/101.Multiple.create.t t/Controller/102.Multiple.add-remove.t t/Controller/103.Multiple.owns.t t/Controller/104.Multiple.execute.t t/Controller/200.STDIO.load.t t/Controller/201.STDIO.create.t t/Controller/300.TCP.load.t t/Controller/301.TCP.create.t t/Controller/302.TCP.owns.t t/Controller/303.TCP.selector.t t/Controller/304.TCP.execute.t t/Controller/400.UDP.load.t t/Controller/401.UDP.create.t t/SlideShow/00.load.t t/SlideShow/01.can.t t/SlideShow/02.read.t t/SlideShow/03.getstuff.t t/SlideShow/04.movement.t t/SlideTracker/00.load.t t/SlideTracker/01.create.t t/SlideTracker/02.transition.t t/00.load...............................1..13 # Testing inclusions ok 1 - use WWW::Slides; # Loading WWW::Slides 0.0.8 # Loading WWW::Slides::Talk 0.0.5 ok 2 - use WWW::Slides::Talk; # Loading WWW::Slides::Attendee 0.0.4 ok 3 - use WWW::Slides::Attendee; # Loading WWW::Slides::SlideShow 0.0.7 # Loading WWW::Slides::SlideTracker 0.0.3 # Loading WWW::Slides::BasicLogger 0.0.5 ok 4 - use WWW::Slides::SlideShow; ok 5 - use WWW::Slides::SlideTracker; ok 6 - use WWW::Slides::BasicLogger; ok 7 - use WWW::Slides::Controller::UDP; # Loading WWW::Slides::Controller::UDP 0.0.9 ok 8 - use WWW::Slides::Controller::TCP; # Loading WWW::Slides::Controller::TCP 0.0.9 # Loading WWW::Slides::Controller::STDIO 0.0.9 # Loading WWW::Slides::Controller::Multiple 0.0.9 # Loading WWW::Slides::Controller::Single 0.0.9 ok 9 - use WWW::Slides::Controller::STDIO; ok 10 - use WWW::Slides::Controller::Multiple; ok 11 - use WWW::Slides::Controller::Single; # Loading WWW::Slides::Client::TCP 0.0.3 ok 12 - use WWW::Slides::Client::TCP; # Loading WWW::Slides::Client::Base 0.0.5 ok 13 - use WWW::Slides::Client::Base; ok t/Attendee/00.load......................1..1 ok 1 - use WWW::Slides::Attendee; # Testing WWW::Slides::Attendee 0.0.4 ok t/Attendee/01.create....................1..9 ok 1 - require WWW::Slides::Attendee; ok 2 - balks for incomplete constructor ok 3 - balks for incomplete constructor ok 4 - constructor ok with all mandatory parameters ok 5 - HTTP header incipit and status ok 6 - header has a date field ok 7 - header has a content-type field ok 8 - line terminator is \r\n ok 9 - answer body is correct ok t/Attendee/02.transition................1..9 ok 1 - require WWW::Slides::Attendee; ok 2 - balks for incomplete constructor ok 3 - balks for incomplete constructor ok 4 - constructor ok with all mandatory parameters ok 5 - correctly sent absolute slide ok 6 - correctly returned to first slide ok 7 - correctly jumped to last slide ok 8 - correctly called previous slide ok 9 - correctly called next slide ok t/Attendee/03.ping......................1..5 ok 1 - require WWW::Slides::Attendee; ok 2 - balks for incomplete constructor ok 3 - balks for incomplete constructor ok 4 - constructor ok with all mandatory parameters ok 5 - ping correctly sent ok t/Attendee/04.handle_input..............1..6 ok 1 - require WWW::Slides::Attendee; ok 2 - balks for incomplete constructor ok 3 - constructor ok with all mandatory parameters ok 4 - correctly dropped first 4 chars ok 5 - correctly dropped next 7 chars ok 6 - client exited ok t/BasicLogger/00.load...................1..1 ok 1 - use WWW::Slides::BasicLogger; # Testing WWW::Slides::BasicLogger 0.0.5 ok t/BasicLogger/01.create.................1..4 ok 1 - require WWW::Slides::BasicLogger; ok 2 - object correctly created isa WWW::Slides::BasicLogger ok 3 - fake parameter accepted isa WWW::Slides::BasicLogger ok 4 - channel parameter accepted isa WWW::Slides::BasicLogger ok t/BasicLogger/02.default................1..7 ok 1 - require WWW::Slides::BasicLogger; ok 2 - default constructor ok isa WWW::Slides::BasicLogger ok 3 - debug() ok 4 - info() ok 5 - warn() ok 6 - error() ok 7 - fatal() ok t/BasicLogger/03.stdout.................1..7 ok 1 - require WWW::Slides::BasicLogger; ok 2 - constructor ok isa WWW::Slides::BasicLogger ok 3 - debug() ok 4 - info() ok 5 - warn() ok 6 - error() ok 7 - fatal() ok t/BasicLogger/04.fake...................1..12 ok 1 - require WWW::Slides::BasicLogger; ok 2 - constructor ok for silent logger isa WWW::Slides::BasicLogger ok 3 - debug() ok 4 - info() ok 5 - warn() ok 6 - error() ok 7 - fatal() ok 8 - debug() ok 9 - info() ok 10 - warn() ok 11 - error() ok 12 - fatal() ok t/Client/00.load........................1..1 ok 1 - use WWW::Slides::Client::Base; # Testing WWW::Slides::Client::Base 0.0.5 ok t/Client/01.create......................1..5 ok 1 - require WWW::Slides::Client::Base; ok 2 - complains for missing arguments ok 3 - complains for missing argument in_handle ok 4 - complains for missing argument out_handle ok 5 - correctly builds with both parameters ok t/Client/02.traffic.....................1..34 ok 1 - require WWW::Slides::Client::Base; ok 2 - pipe ok ok 3 - builds correctly ok 4 - WWW::Slides::Client::Base->can(...) ok 5 - raw_send # Failed test 'receive' # at t/Client/02.traffic.t line 32. not ok 6 - receive # got: '' # expected: 'ciao' # Failed test 'send_command' # at t/Client/02.traffic.t line 33. not ok 7 - send_command # got: '' # expected: 'ciao # ' # Failed test 'first (no targets)' # at t/Client/02.traffic.t line 38. not ok 8 - first (no targets) # '' # doesn't match '(?msx-i:\A command=first \s+ target=\s*\n\z)' # Failed test 'first (one target)' # at t/Client/02.traffic.t line 43. not ok 9 - first (one target) # '' # doesn't match '(?msx-i:\A command=first \s+ target=ciao \s*\n\z)' # Failed test 'first (three targets)' # at t/Client/02.traffic.t line 48. not ok 10 - first (three targets) # '' # doesn't match '(?msx-i:\A command=first \s+ target=ciao,a,tutti \s*\n\z)' # Failed test 'last (no targets)' # at t/Client/02.traffic.t line 38. not ok 11 - last (no targets) # '' # doesn't match '(?msx-i:\A command=last \s+ target=\s*\n\z)' # Failed test 'last (one target)' # at t/Client/02.traffic.t line 43. not ok 12 - last (one target) # '' # doesn't match '(?msx-i:\A command=last \s+ target=ciao \s*\n\z)' # Failed test 'last (three targets)' # at t/Client/02.traffic.t line 48. not ok 13 - last (three targets) # '' # doesn't match '(?msx-i:\A command=last \s+ target=ciao,a,tutti \s*\n\z)' # Failed test 'previous (no targets)' # at t/Client/02.traffic.t line 38. not ok 14 - previous (no targets) # '' # doesn't match '(?msx-i:\A command=previous \s+ target=\s*\n\z)' # Failed test 'previous (one target)' # at t/Client/02.traffic.t line 43. not ok 15 - previous (one target) # '' # doesn't match '(?msx-i:\A command=previous \s+ target=ciao \s*\n\z)'