# running Build.PL C:\cpanrun\build\5-10-0\bin\perl.exe Build.PL Checking whether your kit is complete... Looks good Checking prerequisites... Looks good Creating new 'Build' script for 'DBIx-Path' version '0.03' 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 Build --makefile_env_macros 1 Build: blib\lib\DBIx\Path.pm: cannot resolve L in paragraph 161. Copying lib\DBIx\Path.pm -> blib\lib\DBIx\Path.pm Manifying blib\lib/DBIx/Path.pm -> blib\libdoc\DBIx.Path.3 HTMLifying blib\lib\DBIx\Path.pm -> blib\libhtml\site\lib\DBIx\Path.html 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 Build --makefile_env_macros 1 test t\1-basic........1..8 ok 1 - use DBIx::Path; ok 2 - DBIx::Path->can('new') ok 3 - DBIx::Path->can('get') ok 4 - DBIx::Path->can('set') ok 5 - DBIx::Path->can('add') ok 6 - DBIx::Path->can('del') ok 7 - DBIx::Path->can('list') ok 8 - DBIx::Path->can('resolve') ok t\2-construct....1..3 ok 1 - use DBIx::Path; ok 2 - Constructor returned something ok 3 - isa DBIx::Path ok t\2-get..........1..32 ok 1 - use DBIx::Path; ok 2 - Constructor return isa DBIx::Path ok 3 - get('usr') gives something ok 4 - isa DBIx::Path ok 5 - with the right name ok 6 - and the right ID ok 7 - get('var') gives something ok 8 - isa DBIx::Path ok 9 - with the right name ok 10 - and the right ID ok 11 - get('tmp') gives something ok 12 - isa DBIx::Path ok 13 - with the right name ok 14 - and the right ID ok 15 - get('home') gives something ok 16 - isa DBIx::Path ok 17 - with the right name ok 18 - and the right ID ok 19 - descending tests - get('usr') in root gives something ok 20 - isa DBIx::Path ok 21 - with the right name ok 22 - and the right parent ID ok 23 - descending tests - get('bin') in 'usr' gives something ok 24 - isa DBIx::Path ok 25 - with the right name ok 26 - and the right parent ID ok 27 - descending tests - get('perl') in 'bin' gives something ok 28 - isa DBIx::Path ok 29 - with the right name ok 30 - and the right parent ID ok 31 - get('lost+found') returns undef ok 32 - And sets $! to ENOENT DBI st handle 0x2293704 cleared whilst still active, line 24. dbih_clearcom (sth 0x2293704, com 0x228e8ec, imp DBD::AnyData::st): FLAGS 0x182195: COMSET Active Warn RaiseError PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x1eb265c) KIDS 0 (0 Active) NUM_OF_FIELDS 3 NUM_OF_PARAMS 2 ok t\2-list.........1..8 ok 1 - use DBIx::Path; ok 2 - Constructor return isa DBIx::Path ok 3 - root->list() returns the right number of children ok 4 - with the right names ok 5 - usr->list() returns the right number of children ok 6 - with the right names ok 7 - tmp->list() returns the right number of children DBI st handle 0x22b1b54 cleared whilst still active, line 24. dbih_clearcom (sth 0x22b1b54, com 0x22b3e24, imp DBD::AnyData::st): ok 8 - with the right names FLAGS 0x182195: COMSET Active Warn RaiseError PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x1ceada4) KIDS 0 (0 Active) NUM_OF_FIELDS 3 NUM_OF_PARAMS 1 DBI st handle 0x228c77c cleared whilst still active, line 24. dbih_clearcom (sth 0x228c77c, com 0x228ddbc, imp DBD::AnyData::st): FLAGS 0x182195: COMSET Active Warn RaiseError PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x1ceada4) KIDS 0 (0 Active) NUM_OF_FIELDS 3 NUM_OF_PARAMS 2 ok t\2-parents......1..9 ok 1 - use DBIx::Path; ok 2 - Constructor return isa DBIx::Path ok 3 - root->get(usr)->get(bin) isa DBIx::Path ok 4 - bin->get(perl) isa DBIx::Path ok 5 - perl has one parent ok 6 - with bin's ID ok 7 - one name ok 8 - and it's 'perl' DBI st handle 0x22b29bc cleared whilst still active, line 24. dbih_clearcom (sth 0x22b29bc, com 0x22b6304, imp DBD::AnyData::st): FLAGS 0x182195: COMSET Active Warn RaiseError PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x1eb244c) KIDS 0 (0 Active) NUM_OF_FIELDS 3 NUM_OF_PARAMS 1 ok 9 - Root is an orphan DBI st handle 0x229326c cleared whilst still active, line 24. dbih_clearcom (sth 0x229326c, com 0x22ae804, imp DBD::AnyData::st): FLAGS 0x182195: COMSET Active Warn RaiseError PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x1eb244c) KIDS 0 (0 Active) NUM_OF_FIELDS 3 NUM_OF_PARAMS 2 ok t\2-resolve......1..32 ok 1 - use DBIx::Path; ok 2 - Constructor return isa DBIx::Path ok 3 - resolve( qw( usr ) ) returned something ok 4 - isa DBIx::Path ok 5 - $node->id is '1' ok 6 - $node->pid is '0' ok 7 - $node->name is 'usr' ok 8 - resolve( qw( usr bin ) ) returned something ok 9 - isa DBIx::Path ok 10 - $node->id is '5' ok 11 - $node->pid is '1' ok 12 - $node->name is 'bin' ok 13 - resolve( qw( usr bin perl ) ) returned something ok 14 - isa DBIx::Path ok 15 - $node->id is '7' ok 16 - $node->pid is '5' ok 17 - $node->name is 'perl' ok 18 - resolve( qw( lost+found ) ) returned undef ok 19 - with $! set to ENOENT ok 20 - @RESOLVED = qw( ) ok 21 - @FAILED = qw( lost+found ) ok 22 - $PARENT->id = 0 ok 23 - resolve( qw( usr lost+found ) ) returned undef ok 24 - with $! set to ENOENT ok 25 - @RESOLVED = qw( usr ) ok 26 - @FAILED = qw( lost+found ) ok 27 - $PARENT->id = 1 ok 28 - resolve( qw( usr lost+found 1097763 ) ) returned undef ok 29 - with $! set to ENOENT ok 30 - @RESOLVED = qw( usr ) ok 31 - @FAILED = qw( lost+found 1097763 ) ok 32 - $PARENT->id = 1 ok t\2-reverse......1..14 ok 1 - use DBIx::Path; ok 2 - Constructor return isa DBIx::Path ok 3 - resolve(usr) return isa DBIx::Path ok 4 - node->reverse returned 1 result ok 5 - an arrayref ok 6 - and it looks like what it should ok 7 - resolve(usr bin) return isa DBIx::Path ok 8 - node->reverse returned 1 result ok 9 - an arrayref ok 10 - and it looks like what it should ok 11 - resolve(usr bin perl) return isa DBIx::Path ok 12 - node->reverse returned 1 result ok 13 - an arrayref ok 14 - and it looks like what it should ok t\3-add..........1..12 ok 1 - use DBIx::Path; ok 2 - Constructor return isa DBIx::Path ok 3 - add('lib', 10) returned something ok 4 - isa DBIx::Path ok 5 - get('lib') returned something ok 6 - isa DBIx::Path ok 7 - pids match ok 8 - ids match ok 9 - names match ok 10 - re-add('lib', 11) fails ok 11 - and sets $! to EEXIST DBI st handle 0x228c9ac cleared whilst still active, line 24. dbih_clearcom (sth 0x228c9ac, com 0x228e744, imp DBD::AnyData::st): ok 12 - get('lib') unaffected FLAGS 0x182195: COMSET Active Warn RaiseError PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x1eb25b4) KIDS 0 (0 Active) NUM_OF_FIELDS 3 NUM_OF_PARAMS 2 ok t\3-del..........1..9 ok 1 - use DBIx::Path; ok 2 - Constructor return isa DBIx::Path ok 3 - Sanity check--all is right in the world isa DBIx::Path ok 4 - del('tmp') thinks it worked ok 5 - ...and it was right. ok 6 - Proper error return from get() ok 7 - Sanity check again ok 8 - del('lost+found') fails, as it should ok 9 - $! is ENOENT DBI st handle 0x2273ae4 cleared whilst still active, line 24. dbih_clearcom (sth 0x2273ae4, com 0x228e91c, imp DBD::AnyData::st): FLAGS 0x182195: COMSET Active Warn RaiseError PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x1eb30bc) KIDS 0 (0 Active) NUM_OF_FIELDS 3 NUM_OF_PARAMS 2 ok t\3-set..........1..12 ok 1 - use DBIx::Path; ok 2 - Constructor return isa DBIx::Path ok 3 - set('lib', 10) returned something ok 4 - isa DBIx::Path ok 5 - get('lib') returned something ok 6 - isa DBIx::Path ok 7 - pids match ok 8 - ids match ok 9 - names match ok 10 - re-set('lib', 11) returned something ok 11 - isa DBIx::Path DBI st handle 0x21fcf6c cleared whilst still active, line 24. ok 12 - get('lib') registers change dbih_clearcom (sth 0x21fcf6c, com 0x228f3bc, imp DBD::AnyData::st): FLAGS 0x182195: COMSET Active Warn RaiseError PrintError PrintWarn ShowErrorStatement PARENT DBI::db=HASH(0x21ece04) KIDS 0 (0 Active) NUM_OF_FIELDS 3 NUM_OF_PARAMS 2 ok t\4-lock.........1..16 ok 1 - use DBIx::Path; ok 2 - Constructor return isa DBIx::Path ok 3 - Initialization: Locks and unlocks even ok 4 - Initialization: Took 0 lock(s) ok 5 - get: Locks and unlocks even ok 6 - get: Took 1 lock(s) ok 7 - list: Locks and unlocks even ok 8 - list: Took 1 lock(s) ok 9 - resolve: Locks and unlocks even ok 10 - resolve: Took 1 lock(s) ok 11 - add: Locks and unlocks even ok 12 - add: Took 1 lock(s) ok 13 - del: Locks and unlocks even ok 14 - del: Took 1 lock(s) ok 15 - set: Locks and unlocks even ok 16 - set: Took 1 lock(s) ok All tests successful. Files=11, Tests=155, 6 wallclock secs ( 0.00 cusr + 0.00 csys = 0.00 CPU) 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 Build --makefile_env_macros 1 install Installing C:\cpanrun\build\5-10-0\site\lib\DBIx\Path.pm Installing C:\cpanrun\build\5-10-0\man\man3\DBIx.Path.3 Installing C:\cpanrun\build\5-10-0\html\site\lib\DBIx\Path.html Writing C:\cpanrun\build\5-10-0\site\lib\auto\DBIx\Path\.packlist