Microsoft (R) Program Maintenance Utility Version 7.00.8882 Copyright (C) Microsoft Corp 1988-2000. All rights reserved. C:\cpanrun-5.8\build\5-8-0\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib\lib', 'blib\arch')" t\00_init.t t\05_question.t t\10_basic.t t\20_q_and_a.t t\30_env.t t\40_defaults.t t\50_save.t t\60_validate.t t\00_init........1..1 ok 1 - use Module::TestConfig; ok t\05_question....1..9 ok 1 - new( [ ... ]) ok 2 - new( ... ) ok 3 - new( { ... opts => { ... } } ) ok 4 - aliases in new() ok 5 - opts( { ... } ) ok 6 - opts( ... ) ok 7 - q1 eq q2 ok 8 - q1 eq q3 ok 9 - q1 eq q4 ok t\10_basic.......1..13 ok 1 - new() ok 2 - verbose() ok 3 - defaults() ok 4 - file() ok 5 - order() ok 6 - questions() ok 7 - new() with bad args ok 8 - verbose(0) ok 9 - defaults('foo') ok 10 - file('bar') ok 11 - order('defaults') ok 12 - order(['defaults']) ok 13 - questions() ok t\20_q_and_a.....1..15 ok 1 - new( q & a ) ok 2 - q1 msg ok 3 - q1 name ok 4 - q1 default ok 5 - q2 msg ok 6 - q2 name ok 7 - q2 default ok 8 - answers() looks ok ok 9 - answer(1) ok 10 - answer(2) ok 11 - answer('undef') One? [1] 1 Two? [2] 2 ok 12 - ask() ok 13 - answer(1) ok 14 - answer(2) ok 15 - answer('undef') ok t\30_env.........1..6 ok 1 - new() One? [1] 1 Two? [2] 2 Three? [3] 3 Four? [4] 4 ok 2 - ask() ok 3 - answer(1) ok 4 - answer(2) ok 5 - answer(3) ok 6 - answer(4) ok t\40_defaults....1..28 ok 1 - new() One? [1] 1 Two? [2] 2 Three? [3] 3 Four? [4] 4 Five? [5] 5 ok 2 - ask() ok 3 - answer(1) from file ok 4 - answer(2) from file ok 5 - answer(3) from file ok 6 - answer(4) from default ok 7 - answer(5) from env ok 8 - bad answer set ok 9 - save_defaults() ok 10 - wrote new defaults file ok 11 - parse new defaults file # Failed test (t\40_defaults.t at line 63) # Looks like you failed 1 tests of 28. ok 12 - answer(1) from test.conf ok 13 - answer(2) from test.conf ok 14 - answer(3) from test.conf ok 15 - answer(4) from test.conf ok 16 - answer(5) from test.conf ok 17 - didn't write key with : ok 18 - bad answer set ok 19 - save_defaults( sep => '=' ) ok 20 - wrote new defaults file not ok 21 - old defaults file backed up ok 22 - parse new defaults file ok 23 - answer(1) from test.conf ok 24 - answer(2) from test.conf ok 25 - answer(3) from test.conf ok 26 - answer(4) from test.conf ok 27 - answer(5) from test.conf ok 28 - didn't write key with = dubious Test returned status 1 (wstat 256, 0x100) DIED. FAILED test 21 Failed 1/28 tests, 96.43% okay t\50_save........ok 1 - new() One? [1] 1 Two? [2] 2 Three? [3] 3 Four? [4] 4 Five? [5] 5 ok 2 - ask() The system cannot find the path specified. Module::TestConfig saved MyConfig.pm with these settings: =========================== | Name | Value | =========================== | one | 1 | | two | 2 | | three | 3 | | four | 4 | | testconfig_five | 5 | +-----------------+-------+ ok 3 - save() ok 4 - MyConfig.pm was written ok 5 - require 'MyConfig.pm' ok 6 - MyConfig->new() ok 7 - one() == 1 ok 8 - two() == 2 ok 9 - three() == 3 ok 10 - four() == 4 ok 11 - five() == 5 ok 12 - dne(), a nonexistent method The system cannot find the path specified. ok 13 - report 1 The system cannot find the path specified. ok 14 - report 2 The system cannot find the path specified. ok 15 - report 3 The system cannot find the path specified. ok 16 - report 4 The system cannot find the path specified. ok 17 - report 5 1..17 ok t\60_validate....1..11 ok 1 - new() One? [1] 1 Two? [2] 2 Three? [3] 3 Four? [4] 4 Five? [5] 5 ok 2 - ask() ok 3 - answer(1) from file ok 4 - answer(2) from file ok 5 - answer(3) from file ok 6 - answer(4) from default ok 7 - answer(5) from env ok 8 - question with a regex validation that should fail Type a number: [x] x Type a number: [x] x Type a number: [x] x Type a number: [x] x Type a number: [x] x Type a number: [x] x Type a number: [x] x Type a number: [x] x Type a number: [x] x Type a number: [x] x Type a number: [x] x Don't type x: [x] x Don't type x: [x] x Don't type x: [x] x Don't type x: [x] x Don't type x: [x] x Don't type x: [x] x Don't type x: [x] x Don't type x: [x] x Don't type x: [x] x Don't type x: [x] x Don't type x: [x] x ok 9 - ask() ok 10 - num shouldn't be set to 'x' ok 11 - cb shouldn't be set to 'x' ok Failed 1/8 test scripts, 87.50% okay. 1/100 subtests failed, 99.00% okay. Failed Test Stat Wstat Total Fail Failed List of Failed ------------------------------------------------------------------------------- t\40_defaults.t 1 256 28 1 3.57% 21 NMAKE : fatal error U1077: 'C:\cpanrun-5.8\build\5-8-0\bin\perl.exe' : return code '0xff' Stop.