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 Build --makefile_env_macros 1 install
Installing C:\cpanrun-5.8\build\5-8-0\site\lib\Class\DBI\FormTools.pm
Installing C:\cpanrun-5.8\build\5-8-0\html\site\lib\Class\DBI\FormTools.html
Writing C:\cpanrun-5.8\build\5-8-0\site\lib\auto\Class\DBI\FormTools\.packlist
ocal_fields...........1..10
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(location)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(films)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(actors)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(roles)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
ok 1 - set_db()
ok 2 - Driver set correctly
prepare_cached(INSERT INTO films (length, comment, title)
VALUES (?, ?, ?)
) statement handle DBIx::ContextualFetch::st=HASH(0x2173200) still Active at C:/cpanrun-5.8/build/5-8-0/site/lib/Ima/DBI.pm line 398
ok 3 - form_fieldname: cdbi|o1|Film|1|title
ok 4 - form_fieldname: cdbi|o1|Film|1|length
ok 5 - form_fieldname: cdbi|o1|Film|1|comment
ok 6 - formfield: <input name="cdbi|o1|Film|1|title" type="text" value="Test film" />
ok 7 - formfield: <input name="cdbi|o1|Film|1|length" type="text" value="99" />
ok 8 - formfield: <input name="cdbi|o1|Film|1|comment" type="text" value="cool!" />
Formdata: $VAR1 = {
          'cdbi|o2|Film|2|length' => 99,
          'cdbi|o2|Film|2|comment' => 'This is a comment',
          'cdbi|o1|Film|1|length' => 99,
          'cdbi|o1|Film|1|comment' => 'This is a comment',
          'cdbi|o4|Film|new|length' => 99,
          'cdbi|o4|Film|new|title' => 'Title',
          'cdbi|o3|Film|new|length' => 99,
          'cdbi|o3|Film|new|comment' => 'This is a comment',
          'cdbi|o4|Film|new|comment' => 'This is a comment',
          'cdbi|o1|Film|1|title' => 'Title',
          'cdbi|o3|Film|new|title' => 'Title',
          'cdbi|o2|Film|2|title' => 'Title'
        };
prepare_cached(INSERT INTO films (length, comment, title)
VALUES (?, ?, ?)
) statement handle DBIx::ContextualFetch::st=HASH(0x2173200) still Active at C:/cpanrun-5.8/build/5-8-0/site/lib/Ima/DBI.pm line 398
prepare_cached(INSERT INTO films (length, comment, title)
VALUES (?, ?, ?)
) statement handle DBIx::ContextualFetch::st=HASH(0x2173200) still Active at C:/cpanrun-5.8/build/5-8-0/site/lib/Ima/DBI.pm line 398
ok 9 - formdata_to_objects: Ojects extracted
prepare_cached(UPDATE films
SET    length = ?, comment = ?, title = ?
WHERE  id=?
) statement handle DBIx::ContextualFetch::st=HASH(0x21af42c) still Active at C:/cpanrun-5.8/build/5-8-0/site/lib/Ima/DBI.pm line 398
prepare_cached(UPDATE films
SET    length = ?, comment = ?, title = ?
WHERE  id=?
) statement handle DBIx::ContextualFetch::st=HASH(0x21af42c) still Active at C:/cpanrun-5.8/build/5-8-0/site/lib/Ima/DBI.pm line 398
prepare_cached(UPDATE films
SET    length = ?, comment = ?, title = ?
WHERE  id=?
) statement handle DBIx::ContextualFetch::st=HASH(0x21af42c) still Active at C:/cpanrun-5.8/build/5-8-0/site/lib/Ima/DBI.pm line 398
ok 10 - Objects updated
ok
t\20.one_to_many_fields.....1..4
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(location)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(films)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(actors)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(roles)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
ok 1 - set_db()
ok 2 - Driver set correctly
Formdata: $VAR1 = {
          'cdbi|o1|Film|1|title' => 'Title',
          'cdbi|o1|Film|1|length' => 99,
          'cdbi|o1|Film|1|location_id' => 1,
          'cdbi|o1|Film|1|comment' => 'This is a comment'
        };
ok 3 - formdata_to_objects: Existing object with existing relation
Final objects: $VAR1 = [
          bless( {
                   '__triggers' => {},
                   '_class_trigger_results' => [],
                   'length' => 99,
                   'comment' => 'This is a comment',
                   '__Changed' => {
                                    'length' => 1,
                                    'comment' => 1,
                                    'title' => 1,
                                    'location_id' => 1
                                  },
                   'id' => '1',
                   'title' => 'Title',
                   'location_id' => bless( {
                                             '__triggers' => {},
                                             '_class_trigger_results' => [],
                                             'name' => 'Test location',
                                             'id' => '1'
                                           }, 'Location' )
                 }, 'Film' )
        ];
ok 4
ok
t\21.one_to_many_fields.....1..4
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(location)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(films)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(actors)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(roles)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
ok 1 - set_db()
ok 2 - Driver set correctly
Formdata: $VAR1 = {
          'cdbi|o1|Film|1|title' => 'Title',
          'cdbi|o1|Film|1|length' => 99,
          'cdbi|o1|Film|1|location_id' => 'o2',
          'cdbi|o2|Location|new|name' => 'Somewhere',
          'cdbi|o1|Film|1|comment' => 'This is a comment'
        };
ok 3 - formdata_to_objects: Existing object with existing relation
Final objects: $VAR1 = [
          bless( {
                   '__triggers' => {},
                   '_class_trigger_results' => [],
                   'length' => 99,
                   'comment' => 'This is a comment',
                   '__Changed' => {
                                    'length' => 1,
                                    'comment' => 1,
                                    'title' => 1,
                                    'location_id' => 1
                                  },
                   'id' => '1',
                   'title' => 'Title',
                   'location_id' => bless( {
                                             '__triggers' => {},
                                             '_class_trigger_results' => [],
                                             'name' => 'Somewhere',
                                             '__Changed' => {
                                                              'name' => 2
                                                            },
                                             'id' => 1
                                           }, 'Location' )
                 }, 'Film' ),
          $VAR1->[0]{'location_id'}
        ];
ok 4
ok
t\22.one_to_many_fields.....1..4
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(location)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(films)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(actors)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(roles)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
ok 1 - set_db()
ok 2 - Driver set correctly
Formdata: $VAR1 = {
          'cdbi|o1|Film|new|location_id' => 'o2',
          'cdbi|o1|Film|new|length' => 99,
          'cdbi|o2|Location|new|name' => 'Somewhere',
          'cdbi|o1|Film|new|comment' => 'This is a comment',
          'cdbi|o1|Film|new|title' => 'Title'
        };
ok 3 - formdata_to_objects: Existing object with existing relation
Final objects: $VAR1 = [
          bless( {
                   '__triggers' => {},
                   'length' => 99,
                   '_class_trigger_results' => [
                                                 []
                                               ],
                   'comment' => 'This is a comment',
                   'location_id' => bless( {
                                             '__triggers' => {},
                                             '_class_trigger_results' => [],
                                             'name' => 'Somewhere',
                                             '__Changed' => {
                                                              'name' => 2
                                                            },
                                             'id' => 1
                                           }, 'Location' ),
                   'title' => 'Title',
                   '__Changed' => {
                                    'length' => 1,
                                    'comment' => 1,
                                    'location_id' => 1,
                                    'title' => 1
                                  },
                   'id' => 1
                 }, 'Film' ),
          $VAR1->[0]{'location_id'}
        ];
ok 4
ok
t\30.many_to_many_fields....1..3
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(location)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(films)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(actors)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(roles)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
ok 1 - set_db()
ok 2 - Driver set correctly
Formdata: $VAR1 = {
          'cdbi|o1|Film|1|title' => 'Title',
          'cdbi|o2|Actor|1|name' => 'Test actor',
          'cdbi|o1|Film|1|length' => 99,
          'cdbi|o3|Role|actor_id=o2;film_id=o1|' => 'Test',
          'cdbi|o1|Film|1|comment' => 'This is a comment'
        };
ok 3 - formdata_to_objects: 3 Objects extracted
Final objects: $VAR1 = [
          bless( {
                   '__triggers' => {},
                   '_class_trigger_results' => [],
                   'length' => 99,
                   'comment' => 'This is a comment',
                   '__Changed' => {
                                    'length' => 1,
                                    'comment' => 1,
                                    'title' => 1
                                  },
                   'id' => '1',
                   'title' => 'Title',
                   'location_id' => undef
                 }, 'Film' ),
          bless( {
                   '__triggers' => {},
                   '_class_trigger_results' => [],
                   'name' => 'Test actor',
                   '__Changed' => {
                                    'name' => 1
                                  },
                   'id' => '1'
                 }, 'Actor' ),
          bless( {
                   '__triggers' => {},
                   '_class_trigger_results' => [],
                   'actor_id' => 'o2',
                   'film_id' => 'o1'
                 }, 'Role' )
        ];
ok
t\31.many_to_many_fields....1..3
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(location)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(films)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(actors)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(roles)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
ok 1 - set_db()
ok 2 - Driver set correctly
Formdata: $VAR1 = {
          'cdbi|o1|Film|new|length' => 99,
          'cdbi|o3|Role|actor_id=o2;film_id=o1|' => 'Test',
          'cdbi|o2|Actor|new|name' => 'Test actor',
          'cdbi|o1|Film|new|comment' => 'This is a comment',
          'cdbi|o1|Film|new|title' => 'Title'
        };
ok 3 - formdata_to_objects: Ojects extracted
Final objects: $VAR1 = [
          bless( {
                   '__triggers' => {},
                   'length' => 99,
                   '_class_trigger_results' => [],
                   'comment' => 'This is a comment',
                   'title' => 'Title',
                   '__Changed' => {
                                    'length' => 1,
                                    'comment' => 1,
                                    'title' => 1
                                  },
                   'id' => 1
                 }, 'Film' ),
          bless( {
                   '__triggers' => {},
                   '_class_trigger_results' => [],
                   'name' => 'Test actor',
                   '__Changed' => {
                                    'name' => 1
                                  },
                   'id' => 1
                 }, 'Actor' ),
          bless( {
                   '__triggers' => {},
                   '_class_trigger_results' => [],
                   'actor_id' => 'o2',
                   'film_id' => 'o1'
                 }, 'Role' )
        ];
ok
t\32.many_to_many_fields....1..3
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(location)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(films)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(actors)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
DBD::SQLite::st fetchrow_array warning: not an error(0) at dbdimp.c line 504 [for Statement "PRAGMA table_info(roles)"] at C:/cpanrun-5.8/build/5-8-0/site/lib/DBIx/ContextualFetch.pm line 88.
ok 1 - set_db()
ok 2 - Driver set correctly
Formdata: $VAR1 = {
          'cdbi|o1|Film|new|length' => 99,
          'cdbi|o2|Actor|new|name' => 'Test actor',
          'cdbi|o3|Role|actor_id=o2;film_id=o1|charater' => 'Stan Marsh',
          'cdbi|o1|Film|new|comment' => 'This is a comment',
          'cdbi|o1|Film|new|title' => 'Title'
        };
ok 3 - formdata_to_objects: Ojects extracted
Final objects: $VAR1 = [
          bless( {
                   '__triggers' => {},
                   'length' => 99,
                   '_class_trigger_results' => [],
                   'comment' => 'This is a comment',
                   'title' => 'Title',
                   '__Changed' => {
                                    'length' => 1,
                                    'comment' => 1,
                                    'title' => 1
                                  },
                   'id' => 1
                 }, 'Film' ),
          bless( {
                   '__triggers' => {},
                   '_class_trigger_results' => [],
                   'name' => 'Test actor',
                   '__Changed' => {
                                    'name' => 1
                                  },
                   'id' => 1
                 }, 'Actor' ),
          bless( {
                   '__triggers' => {},
                   '_class_trigger_results' => [],
                   'charater' => 'Stan Marsh',
                   'actor_id' => 'o2',
                   '__Changed' => {
                                    'charater' => 1
                                  },
                   'film_id' => 'o1'
                 }, 'Role' )
        ];
ok
t\pod-coverage..............1..1
ok 1 - Pod coverage on Class::DBI::FormTools
ok
t\pod.......................1..1
ok 1 - blib\lib\Class\DBI\FormTools.pm
ok
All tests successful, 1 test skipped.
Files=11, Tests=34,  9 wallclock secs ( 0.00 cusr +  0.00 csys =  0.00 CPU)