PATH=C:\PlatSDK\Bin\Win64\x86\AMD64;C:\PlatSDK\Bin;C:\PlatSDK\Bin\WinNT;C:\Perl64\site\bin;C:\Perl64\bin;C:\cygwin\bin;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WindowsPowerShell\v1.0;C:\Program Files (x86)\Perforce;C:\mysql\bin
Start 2010-11-30T19:00:26
ActivePerl-1003 CPAN-1.9402
LIB=C:\PlatSDK\Lib\AMD64;C:\PlatSDK\Lib\AMD64\atlmfc
INCLUDE=C:\PlatSDK\Include;C:\PlatSDK\Include\crt;C:\PlatSDK\Include\crt\sys;C:\PlatSDK\Include\mfc;C:\PlatSDK\Include\atl
PATH=C:/cpanfly/var/libs/bin;C:\PlatSDK\Bin\Win64\x86\AMD64;C:\PlatSDK\Bin;C:\PlatSDK\Bin\WinNT;C:\Perl64\site\bin;C:\Perl64\bin;C:\cygwin\bin;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WINDOW~1\v1.0;C:\PROGRA~2\Perforce;C:\mysql\bin
Going to read 'C:\cpanfly\var\cpan\Metadata'
Database was generated on Tue, 30 Nov 2010 22:31:28 GMT
Running make for A/AD/ADAMK/ORLite-1.46.tar.gz
Fetching with LWP:
http://cpan.nas.activestate.com/authors/id/A/AD/ADAMK/ORLite-1.46.tar.gz
Checksum for C:\cpanfly\var\cpan\sources\authors\id\A\AD\ADAMK\ORLite-1.46.tar.gz ok
Will not use Archive::Tar, need 1.00
ORLite-1.46/
ORLite-1.46/README
ORLite-1.46/LICENSE
ORLite-1.46/Makefile.PL
ORLite-1.46/lib/
ORLite-1.46/lib/ORLite.pm
ORLite-1.46/xt/
ORLite-1.46/xt/meta.t
ORLite-1.46/xt/pmv.t
ORLite-1.46/xt/pod.t
ORLite-1.46/META.yml
ORLite-1.46/MANIFEST
ORLite-1.46/Changes
ORLite-1.46/inc/
ORLite-1.46/inc/Module/
ORLite-1.46/inc/Module/Install/
ORLite-1.46/inc/Module/Install/DSL.pm
ORLite-1.46/inc/Module/Install/Can.pm
ORLite-1.46/inc/Module/Install/Base.pm
ORLite-1.46/inc/Module/Install/Fetch.pm
ORLite-1.46/inc/Module/Install/Win32.pm
ORLite-1.46/inc/Module/Install/WriteAll.pm
ORLite-1.46/inc/Module/Install/With.pm
ORLite-1.46/inc/Module/Install/Metadata.pm
ORLite-1.46/inc/Module/Install/Makefile.pm
ORLite-1.46/inc/Module/Install.pm
ORLite-1.46/t/
ORLite-1.46/t/09_badfile.t
ORLite-1.46/t/08_prune.t
ORLite-1.46/t/15_array_xs.t
ORLite-1.46/t/17_cache.sql
ORLite-1.46/t/05_notables.t
ORLite-1.46/t/13_array_basics.t
ORLite-1.46/t/14_array_fk.t
ORLite-1.46/t/03_fk.sql
ORLite-1.46/t/10_cleanup.t
ORLite-1.46/t/06_create.t
ORLite-1.46/t/02_basics.sql
ORLite-1.46/t/12_xs.t
ORLite-1.46/t/lib/
ORLite-1.46/t/lib/Test.pm
ORLite-1.46/t/01_compile.t
ORLite-1.46/t/11_cleanup.t
ORLite-1.46/t/04_readonly.t
ORLite-1.46/t/07_pk.sql
ORLite-1.46/t/08_prune.pl
ORLite-1.46/t/03_fk.t
ORLite-1.46/t/02_basics.t
ORLite-1.46/t/16_array_create.t
ORLite-1.46/t/17_cache.t
ORLite-1.46/t/07_pk.t
ORLite-1.46/t/18_update.t
ORLite-1.46/t/10_cleanup.sql
ORLite-1.46/t/18_update.sql
CPAN.pm: Going to build A/AD/ADAMK/ORLite-1.46.tar.gz
>>> C:\Perl64\bin\perl.exe Makefile.PL
Warning: prerequisite DBD::SQLite 1.27 not found. We have 1.14.
Warning: prerequisite DBI 1.607 not found. We have 1.602.
Checking if your kit is complete...
Looks good
Writing Makefile for ORLite
---- Unsatisfied dependencies detected during ----
---- ADAMK/ORLite-1.46.tar.gz ----
DBD::SQLite [requires]
DBI [requires]
Running make test
Delayed until after prerequisites
Running test for module 'DBD::SQLite'
Running make for A/AD/ADAMK/DBD-SQLite-1.31.tar.gz
Fetching with LWP:
http://cpan.nas.activestate.com/authors/id/A/AD/ADAMK/DBD-SQLite-1.31.tar.gz
Checksum for C:\cpanfly\var\cpan\sources\authors\id\A\AD\ADAMK\DBD-SQLite-1.31.tar.gz ok
Will not use Archive::Tar, need 1.00
DBD-SQLite-1.31/
DBD-SQLite-1.31/META.yml
DBD-SQLite-1.31/Makefile.PL
DBD-SQLite-1.31/MANIFEST.SKIP
DBD-SQLite-1.31/util/
DBD-SQLite-1.31/util/getsqlite.pl
DBD-SQLite-1.31/SQLite.xs
DBD-SQLite-1.31/dbdimp.h
DBD-SQLite-1.31/fts3_tokenizer.h
DBD-SQLite-1.31/LICENSE
DBD-SQLite-1.31/README
DBD-SQLite-1.31/sqlite3ext.h
DBD-SQLite-1.31/ppport.h
DBD-SQLite-1.31/lib/
DBD-SQLite-1.31/lib/DBD/
DBD-SQLite-1.31/lib/DBD/SQLite.pm
DBD-SQLite-1.31/lib/DBD/SQLite/
DBD-SQLite-1.31/lib/DBD/SQLite/Cookbook.pod
DBD-SQLite-1.31/SQLiteXS.h
DBD-SQLite-1.31/sqlite3.c
DBD-SQLite-1.31/xt/
DBD-SQLite-1.31/xt/meta.t
DBD-SQLite-1.31/xt/pmv.t
DBD-SQLite-1.31/xt/pod.t
DBD-SQLite-1.31/inc/
DBD-SQLite-1.31/inc/Test/
DBD-SQLite-1.31/inc/Test/NoWarnings/
DBD-SQLite-1.31/inc/Test/NoWarnings/Warning.pm
DBD-SQLite-1.31/inc/Test/NoWarnings.pm
DBD-SQLite-1.31/dbdimp.c
DBD-SQLite-1.31/MANIFEST
DBD-SQLite-1.31/Changes
DBD-SQLite-1.31/sqlite3.h
DBD-SQLite-1.31/t/
DBD-SQLite-1.31/t/07_error.t
DBD-SQLite-1.31/t/rt_25924_user_defined_func_unicode.t
DBD-SQLite-1.31/t/13_create_collation.t
DBD-SQLite-1.31/t/43_fts3.t
DBD-SQLite-1.31/t/rt_40594_nullable.t
DBD-SQLite-1.31/t/28_schemachange.t
DBD-SQLite-1.31/t/21_blobtext.t
DBD-SQLite-1.31/t/12_unicode.t
DBD-SQLite-1.31/t/rt_31324_full_names.t
DBD-SQLite-1.31/t/39_foreign_keys.t
DBD-SQLite-1.31/t/rt_52573_manual_exclusive_lock.t
DBD-SQLite-1.31/t/32_inactive_error.t
DBD-SQLite-1.31/t/rt_27553_prepared_cache_and_analyze.t
DBD-SQLite-1.31/t/10_create_aggregate.t
DBD-SQLite-1.31/t/rt_29058_group_by.t
DBD-SQLite-1.31/t/09_create_function.t
DBD-SQLite-1.31/t/rt_36836_duplicate_key.t
DBD-SQLite-1.31/t/08_busy.t
DBD-SQLite-1.31/t/02_logon.t
DBD-SQLite-1.31/t/16_column_info.t
DBD-SQLite-1.31/t/33_non_latin_path.t
DBD-SQLite-1.31/t/rt_25371_asymmetric_unicode.t
DBD-SQLite-1.31/t/17_createdrop.t
DBD-SQLite-1.31/t/31_bind_weird_number_param.t
DBD-SQLite-1.31/t/rt_29629_sqlite_where_length.t
DBD-SQLite-1.31/t/40_multiple_statements.t
DBD-SQLite-1.31/t/26_commit.t
DBD-SQLite-1.31/t/rt_36838_unique_and_bus_error.t
DBD-SQLite-1.31/t/04_insert.t
DBD-SQLite-1.31/t/05_select.t
DBD-SQLite-1.31/t/24_numrows.t
DBD-SQLite-1.31/t/18_insertfetch.t
DBD-SQLite-1.31/t/rt_32889_prepare_cached_reexecute.t
DBD-SQLite-1.31/t/22_listfields.t
DBD-SQLite-1.31/t/19_bindparam.t
DBD-SQLite-1.31/t/rt_25460_numeric_aggregate.t
DBD-SQLite-1.31/t/14_progress_handler.t
DBD-SQLite-1.31/t/rt_53235_icu_compatibility.t
DBD-SQLite-1.31/t/30_auto_rollback.t
DBD-SQLite-1.31/t/36_hooks.t
DBD-SQLite-1.31/t/rt_48393_debug_panic_with_commit.t
DBD-SQLite-1.31/t/41_placeholders.t
DBD-SQLite-1.31/t/20_blobs.t
DBD-SQLite-1.31/t/06_tran.t
DBD-SQLite-1.31/t/35_table_info.t
DBD-SQLite-1.31/t/lib/
DBD-SQLite-1.31/t/lib/Test.pm
DBD-SQLite-1.31/t/03_create_table.t
DBD-SQLite-1.31/t/25_chopblanks.t
DBD-SQLite-1.31/t/27_metadata.t
DBD-SQLite-1.31/t/01_compile.t
DBD-SQLite-1.31/t/37_regexp.t
DBD-SQLite-1.31/t/rt_50503_fts3.t
DBD-SQLite-1.31/t/38_empty_statement.t
DBD-SQLite-1.31/t/rt_21406_auto_finish.t
DBD-SQLite-1.31/t/29_cppcomments.t
DBD-SQLite-1.31/t/rt_15186_prepcached.t
DBD-SQLite-1.31/t/42_primary_key_info.t
DBD-SQLite-1.31/t/23_nulls.t
DBD-SQLite-1.31/t/34_online_backup.t
DBD-SQLite-1.31/t/15_ak_dbd.t
CPAN.pm: Going to build A/AD/ADAMK/DBD-SQLite-1.31.tar.gz
>>> C:\Perl64\bin\perl.exe Makefile.PL
We're using the bundled sqlite library.
Checking if your kit is complete...
Looks good
Multiple copies of Driver.xst found in: C:/Perl64/site/lib/auto/DBI/ C:/Perl64/lib/auto/DBI/ at Makefile.PL line 331
Using DBI 1.602 (for perl 5.010000 on MSWin32-x64-multi-thread) installed in C:/Perl64/site/lib/auto/DBI/
Writing Makefile for DBD::SQLite
>>> nmake
Microsoft (R) Program Maintenance Utility Version 7.00.8882
Copyright (C) Microsoft Corp 1988-2000. All rights reserved.
cp lib/DBD/SQLite.pm blib\lib\DBD\SQLite.pm
cp lib/DBD/SQLite/Cookbook.pod blib\lib\DBD\SQLite\Cookbook.pod
C:\Perl64\bin\perl.exe -p -e "s/~DRIVER~/SQLite/g" C:\Perl64\site\lib\auto\DBI\Driver.xst > SQLite.xsi
C:\Perl64\bin\perl.exe C:\cpanfly\var\megalib\ExtUtils\xsubpp -typemap C:\Perl64\lib\ExtUtils\typemap SQLite.xs > SQLite.xsc && C:\Perl64\bin\perl.exe -MExtUtils::Command -e "mv" -- SQLite.xsc SQLite.c
cl -c -I. -IC:\Perl64\site\lib\auto\DBI -nologo -GF -W3 -MD -Zi -DNDEBUG -Ox -GL -Wp64 -fp:precise -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DWIN64 -DCONSERVATIVE -DUSE_SITECUSTOMIZE -DPRIVLIB_LAST_IN_INC -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX -O2 -DVERSION=\"1.31\" -DXS_VERSION=\"1.31\" "-IC:\Perl64\lib\CORE" -DSQLITE_ENABLE_FTS3 -DSQLITE_ENABLE_FTS3_PARENTHESIS -DSQLITE_ENABLE_COLUMN_METADATA -DNDEBUG=1 SQLite.c
SQLite.c
SQLite.xs(160) : warning C4312: 'type cast' : conversion from 'int' to 'SV *' of greater size
SQLite.c(486) : warning C4101: 'RETVAL' : unreferenced local variable
C:\Perl64\site\lib\auto\DBI\Driver_xst.h(106) : warning C4244: 'function' : conversion from 'IV' to 'I32', possible loss of data
C:\Perl64\site\lib\auto\DBI\Driver_xst.h(110) : warning C4244: 'function' : conversion from '__int64' to 'I32', possible loss of data
SQLite.xsi(192) : warning C4244: 'initializing' : conversion from '__int64' to 'int', possible loss of data
SQLite.xsi(623) : warning C4244: 'initializing' : conversion from '__int64' to 'int', possible loss of data
cl -c -I. -IC:\Perl64\site\lib\auto\DBI -nologo -GF -W3 -MD -Zi -DNDEBUG -Ox -GL -Wp64 -fp:precise -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DWIN64 -DCONSERVATIVE -DUSE_SITECUSTOMIZE -DPRIVLIB_LAST_IN_INC -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX -O2 -DVERSION=\"1.31\" -DXS_VERSION=\"1.31\" "-IC:\Perl64\lib\CORE" -DSQLITE_ENABLE_FTS3 -DSQLITE_ENABLE_FTS3_PARENTHESIS -DSQLITE_ENABLE_COLUMN_METADATA -DNDEBUG=1 dbdimp.c
dbdimp.c
dbdimp.c(116) : warning C4267: 'function' : conversion from 'size_t' to 'int', possible loss of data
dbdimp.c(125) : warning C4267: 'function' : conversion from 'size_t' to 'int', possible loss of data
dbdimp.c(128) : warning C4244: 'function' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(133) : warning C4267: 'function' : conversion from 'size_t' to 'int', possible loss of data
dbdimp.c(145) : warning C4101: 'i' : unreferenced local variable
dbdimp.c(148) : warning C4101: 'f' : unreferenced local variable
dbdimp.c(626) : warning C4267: '=' : conversion from 'size_t' to 'int', possible loss of data
dbdimp.c(703) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(704) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(705) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(706) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(712) : warning C4267: '=' : conversion from 'size_t' to 'int', possible loss of data
dbdimp.c(718) : warning C4244: '=' : conversion from '__int64' to 'int', possible loss of data
dbdimp.c(720) : warning C4244: '=' : conversion from '__int64' to 'int', possible loss of data
dbdimp.c(677) : warning C4101: 'n_a' : unreferenced local variable
dbdimp.c(899) : warning C4244: 'initializing' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(921) : warning C4267: 'function' : conversion from 'size_t' to 'int', possible loss of data
dbdimp.c(945) : warning C4267: 'function' : conversion from 'size_t' to 'int', possible loss of data
dbdimp.c(926) : warning C4101: 'numtype' : unreferenced local variable
dbdimp.c(1093) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(1369) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(1383) : warning C4244: 'function' : conversion from 'IV' to 'I32', possible loss of data
dbdimp.c(1790) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(1825) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(1936) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
dbdimp.c(2112) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
cl -c -I. -IC:\Perl64\site\lib\auto\DBI -nologo -GF -W3 -MD -Zi -DNDEBUG -Ox -GL -Wp64 -fp:precise -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DWIN64 -DCONSERVATIVE -DUSE_SITECUSTOMIZE -DPRIVLIB_LAST_IN_INC -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX -O2 -DVERSION=\"1.31\" -DXS_VERSION=\"1.31\" "-IC:\Perl64\lib\CORE" -DSQLITE_ENABLE_FTS3 -DSQLITE_ENABLE_FTS3_PARENTHESIS -DSQLITE_ENABLE_COLUMN_METADATA -DNDEBUG=1 sqlite3.c
sqlite3.c
sqlite3.c(65537) : warning C4049: compiler limit : terminating line number emission
Compiler limit for line number is 65535
Running Mkbootstrap for DBD::SQLite ()
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644 SQLite.bs
C:\Perl64\bin\perl.exe -MExtUtils::Mksymlists -e "Mksymlists('NAME'=>\"DBD::SQLite\", 'DLBASE' => 'SQLite', 'DL_FUNCS' => { }, 'FUNCLIST' => [], 'IMPORTS' => { }, 'DL_VARS' => []);"
link -out:blib\arch\auto\DBD\SQLite\SQLite.dll -dll -nologo -nodefaultlib -debug -opt:ref,icf -ltcg -libpath:"C:\Perl64\lib\CORE" -machine:AMD64 SQLite.obj dbdimp.obj sqlite3.obj C:\Perl64\lib\CORE\perl510.lib oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib bufferoverflowU.lib msvcrt.lib -def:SQLite.def
Creating library blib\arch\auto\DBD\SQLite\SQLite.lib and object blib\arch\auto\DBD\SQLite\SQLite.exp
Generating code
Finished generating code
if exist blib\arch\auto\DBD\SQLite\SQLite.dll.manifest mt -nologo -manifest blib\arch\auto\DBD\SQLite\SQLite.dll.manifest -outputresource:blib\arch\auto\DBD\SQLite\SQLite.dll;2
if exist blib\arch\auto\DBD\SQLite\SQLite.dll.manifest del blib\arch\auto\DBD\SQLite\SQLite.dll.manifest
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "chmod" -- 755 blib\arch\auto\DBD\SQLite\SQLite.dll
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "cp" -- SQLite.bs blib\arch\auto\DBD\SQLite\SQLite.bs
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644 blib\arch\auto\DBD\SQLite\SQLite.bs
ADAMK/DBD-SQLite-1.31.tar.gz
nmake -- OK
Running make test
>>> nmake test TEST_VERBOSE=1
Microsoft (R) Program Maintenance Utility Version 7.00.8882
Copyright (C) Microsoft Corp 1988-2000. All rights reserved.
C:\Perl64\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib\lib', 'blib\arch')" t/*.t
# $DBI::VERSION=1.602
# Compile Options:
# ENABLE_COLUMN_METADATA
# ENABLE_FTS3
# ENABLE_FTS3_PARENTHESIS
# TEMP_STORE=1
# THREADSAFE=1
t/01_compile.t ...........................
1..3
ok 1 - use DBI;
ok 2 - use DBD::SQLite;
ok 3 - use t::lib::Test;
ok
# sqlite_version=3.7.2
t/02_logon.t .............................
1..10
ok 1 - The object isa DBI::db
ok 2 - ->{sqlite_version} ok
ok 3 - AutoCommit is on by default
ok 4 - Found initial busy_timeout
ok 5
ok 6 - Set busy_timeout to new value
ok 7 - The object isa DBI::db
ok 8 - Unicode is on
ok 9 - The object isa DBI::db
ok 10 - no warnings
ok
t/03_create_table.t ......................
1..7
ok 1 - The object isa DBI::db
ok 2 - ->primary_key_info ok
ok 3 - The object isa DBI::st
ok 4 - ->execute ok
ok 5 - Got 4 columns
ok 6 - Table prepending is disabled by default
ok 7 - no warnings
ok
t/04_insert.t ............................
1..14
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE f
ok 3 - DELETE FROM f
ok 4 - The object isa DBI::st
ok 5 - ->execute returns 1 row
ok 6
ok 7
ok 8
ok 9
ok 10 - last_insert_rowid should be 4
ok 11 # skip method installation requires DBI v1.608
ok 12 # skip method installation requires DBI v1.608
ok 13
ok 14 - no warnings
ok
t/05_select.t ............................
1..22
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14 - Check num_rows (1) == 1
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22 - no warnings
ok
t/06_tran.t ..............................
1..3
ok 1 - The object isa DBI::db
ok 2 - 0E0
ID, TITLE, TOTAL
ok 3 - no warnings
ok
t/07_error.t .............................
1..8
ok 1 - The object isa DBI::db
ok 2 - Statement 1 generated an error
ok 3 - $DBI::err ok
ok 4 - $DBI::errstr ok
ok 5 - Statement 2 generated an error
ok 6 - $DBI::err ok
ok 7 - $DBI::errstr ok
ok 8 - no warnings
ok
t/08_busy.t ..............................
1..12
ok 1 - The object isa DBI::db
ok 2 - The object isa DBI::db
ok 3
ok 4
ok 5
ok 6
ok 7
# expected insert failure : DBD::SQLite::db do failed: database is locked at t/08_busy.t line 46.
ok 8
ok 9 - Ready
ok 10
ok 11
ok 12 - no warnings
ok
t/09_create_function.t ...................
1..28
ok 1 - The object isa DBI::db
ok 2
ok 3 - Got a result
ok 4
ok 5 - SELECT add2(1,3)
ok 6 - SELECT add2(a,b) FROM func_test
ok 7
ok 8 - SELECT my_sum( '2', 3, 4, '5')
ok 9
ok 10
ok 11
ok 12
ok 13 - SELECT void_return( 'I died' )
ok 14
ok 15 - SELECT return_null()
ok 16
ok 17 - SELECT return2()
ok 18
ok 19 - SELECT my_defined(1)
ok 20 - SELECT my_defined('')
ok 21 - SELECT my_defined('abc')
ok 22 - SELECT my_defined(NULL)
ok 23
ok 24 - SELECT noop(NULL)
ok 25 - SELECT noop(1)
ok 26 - SELECT noop('')
ok 27 - SELECT noop(1.0625)
ok 28 - no warnings
ok
t/10_create_aggregate.t ..................
1..22
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22 - no warnings
ok
t/12_unicode.t ...........................
1..26
ok 1 - Correct length for $bytestring
ok 2 - Correct length for $utfstring
ok 3 - $utfstring should be marked as UTF-8 by Perl
ok 4 - $bytestring should *NOT* be marked as UTF-8 by Perl
ok 5 - The object isa DBI::db
ok 6 - Unicode is off
ok 7 - CREATE TABLE
ok 8 - Reading blob gives binary
ok 9 - Reading text gives binary too (for now)
ok 10 - No blob corruption
ok 11 - Same text, different encoding
ok 12 - The object isa DBI::db
ok 13 - Unicode is on
ok 14 - Reading blob still gives binary
ok 15 - Reading text returns UTF-8
ok 16 - Still no blob corruption
ok 17 - Same text
ok 18 - Database actually understands char set
ok 19 - The object isa DBI::db
ok 20 - bytestring upgraded to utf-8
ok 21 - bytestring has utf-8 flag
ok 22 - No blob corruption with utf-8 flag on
ok 23 - bytestring downgraded to bytes
ok 24 - bytestring does not have utf-8 flag
ok 25 - No blob corruption with utf-8 flag off
ok 26 - no warnings
ok
t/13_create_collation.t ..................
1..15
ok 1 - can't override builtin perl collation
ok 2 - can't delete builtin perl collation
ok 3 - can't override registered collation
ok 4 - overridden collation
ok 5 - The object isa DBI::db
ok 6 - collate perl (Bergere, Bergèòe, HAT, HOT, berger, bergèòe, ferme, fèöe, féôu, fêôe, hâôer, héòaut, héôaïòe, héôéòoclite, hêôre, hôôe // Bergere, Bergèòe, HAT, HOT, berger, bergèòe, ferme, fèöe, féôu, fêôe, hâôer, héòaut, héôaïòe, héôéòoclite, hêôre, hôôe)
ok 7 - collate perllocale (bergèòe, Bergèòe, berger, Bergere, fèöe, fêôe, féôu, ferme, hâôer, HAT, héôaïòe, héòaut, héôéòoclite, hêôre, hôôe, HOT // bergèòe, Bergèòe, berger, Bergere, fèöe, fêôe, féôu, ferme, hâôer, HAT, héôaïòe, héòaut, héôéòoclite, hêôre, hôôe, HOT)
ok 8 - collate no_accents (Bergèòe, bergèòe, berger, Bergere, fêôe, fèöe, féôu, ferme, hâôer, HAT, héôaïòe, héòaut, héôéòoclite, hêôre, hôôe, HOT // Bergèòe, bergèòe, berger, Bergere, fêôe, fèöe, féôu, ferme, hâôer, HAT, héôaïòe, héòaut, héôéòoclite, hêôre, hôôe, HOT)
ok 9 - collate by_length (HOT, HAT, hôôe, féôu, fêôe, fèöe, hêôre, hâôer, ferme, berger, héòaut, Bergèòe, bergèòe, Bergere, héôaïòe, héôéòoclite // HOT, HAT, hôôe, féôu, fêôe, fèöe, hêôre, hâôer, ferme, berger, héòaut, Bergèòe, bergèòe, Bergere, héôaïòe, héôéòoclite)
ok 10 - The object isa DBI::db
ok 11 - collate perl (Bergere, Bergèòe, HAT, HOT, berger, bergèòe, ferme, fèöe, féôu, fêôe, hâôer, héòaut, héôaïòe, héôéòoclite, hêôre, hôôe // Bergere, Bergèòe, HAT, HOT, berger, bergèòe, ferme, fèöe, féôu, fêôe, hâôer, héòaut, héôaïòe, héôéòoclite, hêôre, hôôe)
ok 12 - collate perllocale (bergèòe, Bergèòe, berger, Bergere, fèöe, féôu, fêôe, ferme, hôôe, hâôer, héôéòoclite, héôaïòe, héòaut, hêôre, HAT, HOT // bergèòe, Bergèòe, berger, Bergere, fèöe, féôu, fêôe, ferme, hôôe, hâôer, héôéòoclite, héôaïòe, héòaut, hêôre, HAT, HOT)
ok 13 - collate no_accents (Bergèòe, bergèòe, berger, Bergere, fêôe, fèöe, féôu, ferme, hâôer, HAT, héôaïòe, héòaut, héôéòoclite, hêôre, hôôe, HOT // Bergèòe, bergèòe, berger, Bergere, fêôe, fèöe, féôu, ferme, hâôer, HAT, héôaïòe, héòaut, héôéòoclite, hêôre, hôôe, HOT)
ok 14 - collate by_length (HOT, HAT, hôôe, féôu, fêôe, fèöe, hêôre, hâôer, ferme, berger, héòaut, Bergèòe, bergèòe, Bergere, héôaïòe, héôéòoclite // HOT, HAT, hôôe, féôu, fêôe, fèöe, hêôre, hâôer, ferme, berger, héòaut, Bergèòe, bergèòe, Bergere, héôaïòe, héôéòoclite)
ok 15 - no warnings
ok
t/14_progress_handler.t ..................
1..6
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6 - no warnings
ok
t/15_ak_dbd.t ............................
1..37
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - ->quote(test1) ok
ok 4 - ->disconnect
ok 5 - The object isa DBI::db
ok 6 - DROP
ok 7 - CREATE TABLE
ok 8 - INSERT 1
ok 9 - DELETE 1
ok 10 - The object isa DBI::st
ok 11 - ->execute
ok 12 - ->fetch returns undef
ok 13 - ->finish
ok 14 - The object isa DBI::st
ok 15 - ->rows is negative
ok 16 - ->execute ok
ok 17 - ->rows returns 0
ok 18 - ->finish
ok 19 - INSERT 2
ok 20 - The object isa DBI::st
ok 21 - ->execute
ok 22 - NULL returned ok
ok 23 - ->finish
ok 24 - DELETE
ok 25 - INSERT 3
ok 26 - The object isa DBI::st
ok 27 - ->execute
ok 28 - ->fetchall_arrayref
ok 29 - ->finish
ok 30 - DELETE
ok 31 - The object isa DBI::st
ok 32 - Execute
ok 33 - Reexecute
ok 34 - ->finish
ok 35 - INSERT 4
ok 36 - The object isa DBI::st
ok 37 - no warnings
ok
t/16_column_info.t .......................
1..12
ok 1 - Created test table
ok 2 - Created temp test table
ok 3 - ATTACH DATABASE ":memory:" AS db3
ok 4 - CREATE TABLE db3.three
ok 5 - No error creating the table
ok 6 - We can get column information
ok 7 - We got information on two columns
ok 8 - We got the right info in TYPE_NAME
ok 9 - We got the right info in COLUMN_NAME
ok 10 - We matched information from multiple databases
ok 11 - We got the right info from multiple databases
ok 12 - no warnings
ok
t/17_createdrop.t ........................
1..4
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - DROP TABLE
ok 4 - no warnings
ok
t/18_insertfetch.t .......................
1..10
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - INSERT
ok 4 - SELECT ok
ok 5 - DELETE
ok 6 - The object isa DBI::st
ok 7 - ->execute
ok 8 - fetch select deleted
ok 9 - fetch empty statement handler
ok 10 - no warnings
ok
t/19_bindparam.t .........................
1..33
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - The object isa DBI::st
ok 4 - EXECUTE 1
ok 5 - EXECUTE 2
ok 6 - EXECUTE 3
ok 7 - bind 1
ok 8 - bind 2
ok 9 - ->execute
ok 10 - bind 3
ok 11 - bind 4
ok 12 - ->execute
ok 13 - ->disconnect
ok 14 - The object isa DBI::db
ok 15 - The object isa DBI::st
ok 16 - ->execute
ok 17 - ->bind_columns
ok 18 - ->fetch
ok 19 - id = 1
ok 20 - name = A
ok 21 - ->fetch
ok 22 - id = 2
ok 23 - name = Tim Bunce
ok 24 - ->fetch
ok 25 - id = 3
ok 26 - name = Jochen Wiedmann
ok 27 - ->fetch
ok 28 - id = 4
ok 29 - name = $konig
ok 30 - ->fetch
ok 31 - id = 5
ok 32 - name = undef
ok 33 - no warnings
ok
t/20_blobs.t .............................
1..10
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - The object isa DBI::st
ok 4 - ->bind_param
ok 5 - ->execute
ok 6 - The object isa DBI::st
ok 7 - ->execute
ok 8 - Got the blob back ok
ok 9 - ->finish
ok 10 - no warnings
ok
t/21_blobtext.t ..........................
1..27
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
# showblob length: 32768
# 00000000 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f
# 00000020 202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f
# 00000040 404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f
# 00000060 606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f
# 00000080 808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9f
# 000000a0 a0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebf
# 000000c0 c0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedf
# 000000e0 e0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
# showblob length: 32768
# 00000000 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f
# 00000020 202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f
# 00000040 404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f
# 00000060 606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f
# 00000080 808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9f
# 000000a0 a0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebf
# 000000c0 c0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedf
# 000000e0 e0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff
ok 13
ok 14
ok 15
# showblob length: 32768
# 00000000 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f
# 00000020 202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f
# 00000040 404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f
# 00000060 606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f
# 00000080 808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9f
# 000000a0 a0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebf
# 000000c0 c0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedf
# 000000e0 e0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff
ok 16
ok 17
ok 18
# showblob length: 32768
# 00000000 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f
# 00000020 202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f
# 00000040 404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f
# 00000060 606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f
# 00000080 808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9f
# 000000a0 a0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebf
# 000000c0 c0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedf
# 000000e0 e0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff
ok 19
ok 20
ok 21
# showblob length: 32768
# 00000000 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f
# 00000020 202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f
# 00000040 404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f
# 00000060 606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f
# 00000080 808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9f
# 000000a0 a0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebf
# 000000c0 c0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedf
# 000000e0 e0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff
ok 22
ok 23
ok 24
# showblob length: 32768
# 00000000 000102030405060708090a0b0c0d0e0f101112131415161718191a1b1c1d1e1f
# 00000020 202122232425262728292a2b2c2d2e2f303132333435363738393a3b3c3d3e3f
# 00000040 404142434445464748494a4b4c4d4e4f505152535455565758595a5b5c5d5e5f
# 00000060 606162636465666768696a6b6c6d6e6f707172737475767778797a7b7c7d7e7f
# 00000080 808182838485868788898a8b8c8d8e8f909192939495969798999a9b9c9d9e9f
# 000000a0 a0a1a2a3a4a5a6a7a8a9aaabacadaeafb0b1b2b3b4b5b6b7b8b9babbbcbdbebf
# 000000c0 c0c1c2c3c4c5c6c7c8c9cacbcccdcecfd0d1d2d3d4d5d6d7d8d9dadbdcdddedf
# 000000e0 e0e1e2e3e4e5e6e7e8e9eaebecedeeeff0f1f2f3f4f5f6f7f8f9fafbfcfdfeff
ok 25
ok 26
ok 27 - no warnings
ok
t/22_listfields.t ........................
1..12
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - The object isa DBI::st
ok 4 - ->execute
ok 5 - Found 2 fields
ok 6 - Names are ok
ok 7 - ->finish ok
ok 8 - The object isa DBI::st
ok 9 - ->execute
ok 10 - No fields in statement
ok 11 - ->finish ok
ok 12 - no warnings
ok
t/23_nulls.t .............................
1..9
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - INSERT
ok 4 - The object isa DBI::st
ok 5 - ->execute ok
ok 6 - Two values in the row
ok 7 - First column is undef
ok 8 - Second column is defined
ok 9 - ->finish
ok
t/24_numrows.t ...........................
1..18
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - INSERT 1
ok 4 - The object isa DBI::st
ok 5 - ->execute
ok 6 - Got 1 rows
ok 7 - ->finish
ok 8 - INSERT 2
ok 9 - The object isa DBI::st
ok 10 - ->execute
ok 11 - Got 2 rows
ok 12 - ->finish
ok 13 - INSERT 3
ok 14 - The object isa DBI::st
ok 15 - ->execute
ok 16 - Got 2 rows
ok 17 - ->finish
ok 18 - no warnings
ok
t/25_chopblanks.t ........................
1..14
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - INSERT 1
ok 4 - INSERT 2
ok 5 - INSERT 3
ok 6 - The object isa DBI::st
ok 7 - ->execute ok
ok 8 - ChopBlanks = 0
ok 9 - ->finish
ok 10 - The object isa DBI::st
ok 11 - ->execute ok
ok 12 - ChopBlanks = 1
ok 13 - ->finish
ok 14 - no warnings
ok
t/26_commit.t ............................
1..28
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - AutoCommit is off
ok 4 - ->err is false
ok 5 - ->err is false
ok 6 - INSERT 1
ok 7 - Found 1 rows
ok 8 - ->rollback ok
ok 9 - Found 0 rows
ok 10 - DELETE 1
ok 11 - Found 0 rows
ok 12 - ->commit ok
ok 13 - Found 0 rows
ok 14 - INSERT 1
ok 15 - Found 1 rows
ok 16 - ->disconnect ok
ok 17 - The object isa DBI::db
ok 18 - Found 0 rows
ok 19 - AutoCommit is on
ok 20 - INSERT 1
ok 21 - Found 1 rows
ok 22 - ->disconnect ok
ok 23 - The object isa DBI::db
ok 24 - Found 1 rows
ok 25 - INSERT 2
ok 26 - Got one warning
ok 27 - INSERT 3
ok 28 - Got one warning
ok
t/27_metadata.t ..........................
1..21
ok 1 - The object isa DBI::db
ok 2 - Create table meta1
ok 3 - Create table meta2
ok 4 - Create table meta3
ok 5 - Get primary_key_info for meta1
ok 6 - Correct primary_key_info returned for meta1
ok 7 - Get primary_key_info for meta2
ok 8 - Correct primary_key_info returned for meta2
ok 9 - Get primary_key_info for meta3
ok 10 - Correct primary_key_info returned for meta3
ok 11 - Create table meta4
ok 12 - Get primary_key_info for meta4
ok 13 - Primary key contains 2 columns
ok 14 - Correct primary_key_info returned for meta4
ok 15 - Get primary_key for meta4
ok 16 - Correct primary_key returned for meta4
ok 17 - $sth->{TYPE} array is same length as $sth->{NAME} array
not ok 18 - $sth->{TYPE}[0] doesn't return a string # TODO $sth->{TYPE} should return an array of integers.
# Failed (TODO) test '$sth->{TYPE}[0] doesn't return a string'
# at t/27_metadata.t line 54.
# got: 'VARCHAR(2)'
# expected: anything else
not ok 19 - $sth->{TYPE}[1] doesn't return a string # TODO $sth->{TYPE} should return an array of integers.
# Failed (TODO) test '$sth->{TYPE}[1] doesn't return a string'
# at t/27_metadata.t line 55.
# got: 'CHAR(1)'
# expected: anything else
not ok 20 - $sth->{TYPE}[0] returns an integer # TODO $sth->{TYPE} should return an array of integers.
# Failed (TODO) test '$sth->{TYPE}[0] returns an integer'
# at t/27_metadata.t line 56.
# 'VARCHAR(2)'
# doesn't match '(?-xism:^-?\d+$)'
not ok 21 - $sth->{TYPE}[1] returns an integer # TODO $sth->{TYPE} should return an array of integers.
# Failed (TODO) test '$sth->{TYPE}[1] returns an integer'
# at t/27_metadata.t line 57.
# 'CHAR(1)'
# doesn't match '(?-xism:^-?\d+$)'
ok
t/28_schemachange.t ......................
1..9
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE table1 (id INTEGER NOT NULL, name CHAR (64) NOT NULL)
ok 3 - CREATE TABLE table2 (id INTEGER NOT NULL, name CHAR (64) NOT NULL)
ok 4 - ->disconnect ok
ok 5 - The object isa DBI::db
ok 6 - waitpid
ok 7 - DROP TABLE table1
ok 8 - CREATE TABLE table2 (id INTEGER NOT NULL, name CHAR (64) NOT NULL)
ok 9 - ->disconnect ok
ok
t/29_cppcomments.t .......................
1..10
ok 1 - dbdimp.c has no C++ comments
ok 2 - SQLite.c has no C++ comments
ok 3 - sqlite3.c has no C++ comments
ok 4 - dbdimp.h has no C++ comments
ok 5 - fts3_tokenizer.h has no C++ comments
ok 6 - ppport.h is not ours to be tested
ok 7 - sqlite3.h has no C++ comments
ok 8 - sqlite3ext.h has no C++ comments
ok 9 - SQLiteXS.h has no C++ comments
ok 10 - SQLite.xs has no C++ comments
ok
t/30_auto_rollback.t .....................
1..6
ok 1 - The object isa DBI::db
ok 2 - ->{PrintWarn} is false
ok 3 - CREATE TABLE ok
ok 4 - ->begin_work
ok 5 - INSERT ok
ok 6 - no warnings
ok
t/31_bind_weird_number_param.t ...........
1..3
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE f
ok 3 - accepts 12300: 12300
ok
t/32_inactive_error.t ....................
1..4
ok 1 - The object isa DBI::db
ok 2
ok 3 - Got 1 warning
ok 4 - Got the expected warning
ok
t/33_non_latin_path.t ....................
1..27
ok 1 - longascii created
ok 2 - The object isa DBI::db
ok 3 - Could connect to database in longascii
ok 4 - The object isa DBI::db
ok 5 - Could connect to database in longascii
ok 6 - Could connect to database in C:\cpanfly\var\tmp\DbOMURsAeF\longascii.db
ok 7 - adatbázis created
ok 8 - The object isa DBI::db
ok 9 - Could connect to database in adatbázis
ok 10 - The object isa DBI::db
ok 11 - Could connect to database in adatbázis
ok 12 - Could connect to database in C:\cpanfly\var\tmp\DbOMURsAeF\adatbázis.db
ok 13 - name with spaces created
ok 14 - The object isa DBI::db
ok 15 - Could connect to database in name with spaces
ok 16 - The object isa DBI::db
ok 17 - Could connect to database in name with spaces
ok 18 - Could connect to database in C:\cpanfly\var\tmp\DbOMURsAeF\name with spaces.db
ok 19 - ¿¿¿ ¿¿¿¿¿¿ created
ok 20 - The object isa DBI::db
ok 21 - Could connect to database in ¿¿¿ ¿¿¿¿¿¿
ok 22 - The object isa DBI::db
ok 23 - Could connect to database in ¿¿¿ ¿¿¿¿¿¿
ok 24 - Could connect to database in C:\cpanfly\var\tmp\DbOMURsAeF\¿¿¿ ¿¿¿¿¿¿.db
ok 25 - The object isa DBI::db
ok 26 - Could connect to temp database (empty filename)
ok 27 - no warnings
ok
t/34_online_backup.t .....................
1..7
ok 1 - The object isa DBI::db
ok 2
ok 3 - Found our process ID in backed-up table
ok 4
ok 5 - The object isa DBI::db
ok 6 - Found our process ID in table back on disk
ok 7 - no warnings
ok
t/35_table_info.t ........................
1..18
ok 1 - The object isa DBI::db
ok 2 - We can get table/schema information
ok 3 - Correct table/schema information
ok 4 - CREATE TABLE one
ok 5 - CREATE TEMP TABLE two
ok 6 - ATTACH DATABASE ":memory:" AS db3
ok 7 - CREATE TABLE db3.three
ok 8 - Correct table_info for "one"
ok 9 - Correct table_info for "main"."one"
ok 10 - Correct table_info for "two"
ok 11 - Correct table_info for "temp"."two"
ok 12 - Correct table_info for "three"
ok 13 - Correct table_info for "db3"."three"
ok 14 - CREATE TABLE db3.one
ok 15 - Correct table_info for both tables named "one"
ok 16 - Correct table_info for the system tables
ok 17 - Correct table_info for all tables
ok 18 - no warnings
ok
t/36_hooks.t .............................
1..25
ok 1 - The object isa DBI::db
ok 2 - initial commit hook was undef
ok 3 - initial rollback hook was undef
ok 4 - initial update hook was undef
ok 5 - 3 commits
ok 6 - 30 updates
ok 7 - update hook arg 0: INSERT
ok 8 - update hook arg 1: database
ok 9 - update hook arg 2: table
ok 10 - update hook arg 3: rowid
ok 11 - previous commit hook correctly returned
ok 12 - previous update hook correctly returned
ok 13 - commit hook unregistered
ok 14 - update hook unregistered
ok 15 - no warnings
ok 16 - transaction was rejected: DBD::SQLite::db commit failed: constraint failed at t/36_hooks.t line 152.
#
ok 17 - 1 rollback
ok 18 - previous hook correctly returned
ok 19 - rollback hook unregistered
ok 20 - no rows added
ok 21 - args to authorizer (INSERT)
ok 22 - delete was rejected with message DBD::SQLite::db do failed: not authorized at t/36_hooks.t line 124.
#
ok 23 - args to authorizer (DELETE)
ok 24 - delete was accepted
ok 25 - no warnings
ok
t/37_regexp.t ............................
1..11
ok 1 - The object isa DBI::db
ok 2 - REGEXP '^b\w+'
ok 3 - NOT REGEXP '^b\w+'
ok 4 - REGEXP '(?i:^b\w+)'
ok 5 - NOT REGEXP '(?i:^b\w+)'
ok 6 - The object isa DBI::db
ok 7 - REGEXP '^b\w+'
ok 8 - NOT REGEXP '^b\w+'
ok 9 - REGEXP '(?i:^b\w+)'
ok 10 - NOT REGEXP '(?i:^b\w+)'
ok 11 - no warnings
ok
t/38_empty_statement.t ...................
1..8
ok 1 - The object isa DBI::db
ok 2 - empty statement does not spit a warning
ok 3 - empty statement does not spit a warning
ok 4 - empty statement does not spit a warning
ok 5 - empty statement does not spit a warning
ok 6 - empty statement does not spit a warning
ok 7 - undef statement does not spit a warning, and does not die anyway
ok 8 - no warnings
ok
t/39_foreign_keys.t ......................
1..17
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok 17 - no warnings
ok
t/40_multiple_statements.t ...............
1..21
ok 1 - The object isa DBI::db
ok 2 - do succeeds anyway
ok 3 - but got nothing as the inserts were discarded
ok 4 - The object isa DBI::db
ok 5 - allows multiple statements
ok 6 - do succeeds anyway
ok 7 - and got the inserted values
ok 8 - The object isa DBI::db
ok 9 - allows multiple statements
ok 10 - executed multiple statements successfully
ok 11 - and got the inserted values
ok 12 - The object isa DBI::db
ok 13 - allows multiple statements
ok 14 - do succeeds anyway
ok 15 - and got the inserted values
ok 16 - The object isa DBI::db
ok 17 - allows multiple statements
ok 18 - executed multiple statements successfully
ok 19 - executed multiple statements successfully
ok 20 - and got the inserted values
ok 21 - no warnings
ok
t/41_placeholders.t ......................
1..9
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9 - no warnings
ok
t/42_primary_key_info.t ..................
1..26
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6 - The object isa DBI::db
ok 7
ok 8
ok 9
ok 10
ok 11 - The object isa DBI::db
ok 12
ok 13
ok 14
ok 15
ok 16 - The object isa DBI::db
ok 17
ok 18
ok 19
ok 20
ok 21 - The object isa DBI::db
ok 22
ok 23
ok 24
ok 25
ok 26 - no warnings
ok
t/43_fts3.t ..............................
1..19
ok 1 - The object isa DBI::db
ok 2 - bergère (unicode is 0)
ok 3 - berg* (unicode is 0)
ok 4 - foobar (unicode is 0)
ok 5 - moutons (unicode is 0)
ok 6 - "qui gardait" (unicode is 0)
ok 7 - moutons NOT lait (unicode is 0)
ok 8 - il était (unicode is 0)
ok 9 - (il OR elle) AND un* (unicode is 0)
ok 10 - The object isa DBI::db
ok 11 - bergère (unicode is 1)
ok 12 - berg* (unicode is 1)
ok 13 - foobar (unicode is 1)
ok 14 - moutons (unicode is 1)
ok 15 - "qui gardait" (unicode is 1)
ok 16 - moutons NOT lait (unicode is 1)
ok 17 - il était (unicode is 1)
ok 18 - (il OR elle) AND un* (unicode is 1)
ok 19 - no warnings
ok
t/rt_15186_prepcached.t ..................
1..13
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - INSERT 1
ok 4 - INSERT 1
ok 5 - INSERT 1
ok 6 - The object isa DBI::st
ok 7 - Query 1 Row 1
ok 8 - The object isa DBI::st
ok 9 - Query 2 Row 1
ok 10 - Query 2 Row 2
ok 11 - The object isa DBI::st
ok 12 - Query 2 Row 2
ok 13 - no warnings
ok
t/rt_21406_auto_finish.t .................
1..11
ok 1 - The object isa DBI::db
ok 2 - The object isa DBI::st
ok 3 - ->execute ok
ok 4 - Row 1 ok
ok 5 - Row 2 ok
ok 6 - The object isa DBI::st
ok 7 - ->execute ok
ok 8 - Row 1 ok
ok 9 - Row 2 ok
ok 10 - ->finish ok
ok 11 - no warnings
ok
t/rt_25371_asymmetric_unicode.t ..........
1..23
ok 1 - The object isa DBI::db
ok 2 - Unicode is on
ok 3 - CREATE TABLE
ok 4 - INSERT
ok 5 - Value round-tripped ok
ok 6
ok 7 - DELETE ok
ok 8 - INSERT
ok 9 - Value round-tripped ok
ok 10
ok 11
ok 12 - DELETE ok
ok 13 - INSERT
ok 14 - Value round-tripped ok
ok 15
ok 16
ok 17 - DELETE ok
ok 18 - INSERT
ok 19 - Value round-tripped ok
ok 20
ok 21
ok 22 - DELETE ok
ok 23 - no warnings
ok
t/rt_25460_numeric_aggregate.t ...........
1..14
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13 - group/sum/sort/limit query ok
ok 14 - no warnings
ok
t/rt_25924_user_defined_func_unicode.t ...
1..16
ok 1 - The object isa DBI::db
ok 2
ok 3 - CREATE TABLE
ok 4 - INSERT
ok 5 - unicode upcase ok
ok 6 - DELETE ok
ok 7 - INSERT
ok 8 - unicode upcase ok
ok 9 - DELETE ok
ok 10 - INSERT
ok 11 - unicode upcase ok
ok 12 - DELETE ok
ok 13 - INSERT
ok 14 - unicode upcase ok
ok 15 - DELETE ok
ok 16 - no warnings
ok
t/rt_27553_prepared_cache_and_analyze.t ..
1..6
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6 - no warnings
ok
t/rt_29058_group_by.t ....................
1..7
ok 1 - The object isa DBI::db
ok 2
ok 3 - Got 2 results
ok 4 - Got 2 results
ok 5 - Got 2 results
not ok 6 - we got 0 items # TODO This test is currently broken again. Wait for a better fix, or use known workarounds shown above
# Failed (TODO) test 'we got 0 items'
# at t/rt_29058_group_by.t line 62.
# got: '0'
# expected: '2'
ok 7 - no warnings
ok
t/rt_29629_sqlite_where_length.t .........
1..17
ok 1 - The object isa DBI::db
ok 2 - insert
ok 3 - execute, select length
ok 4 - select length result
ok 5 - execute: select count(*) from artist where length(name) > ? : [2]
not ok 6 - result of: select count(*) from artist where length(name) > ? : [2] # TODO This test is currently broken again. Wait for a better fix, or use known workarounds.
# Failed (TODO) test 'result of: select count(*) from artist where length(name) > ? : [2]'
# at t/rt_29629_sqlite_where_length.t line 39.
# got: '0'
# expected: '1'
ok 7 - execute: select count(*) from artist where length(name) > 2
ok 8 - result of: select count(*) from artist where length(name) > 2
ok 9 - execute: select count(*) from artist where length(name) > 1
ok 10 - result of: select count(*) from artist where length(name) > 1
ok 11 - execute: select count(*) from artist where length(name) > ? : [1]
not ok 12 - result of: select count(*) from artist where length(name) > ? [1] # TODO This test is currently broken again. Wait for a better fix, or use known workarounds.
# Failed (TODO) test 'result of: select count(*) from artist where length(name) > ? [1]'
# at t/rt_29629_sqlite_where_length.t line 65.
# got: '0'
# expected: '1'
ok 13 - execute: select count(*) from artist where length(name) > ? : [2]
ok 14 - result of: select count(*) from artist where length(name) > ? : [2]
ok 15 - execute: select count(*) from artist where length(name) > ?+0 : [2]
ok 16 - result of: select count(*) from artist where length(name) > ?+0 : [2]
ok 17 - no warnings
ok
t/rt_31324_full_names.t ..................
1..8
ok 1 - The object isa DBI::db
ok 2 - The object isa DBI::st
ok 3 - ->execute ok
ok 4 - Shortname row ok
ok 5 - The object isa DBI::st
ok 6 - ->execute ok
ok 7 - Shortname row ok
ok 8 - no warnings
ok
t/rt_32889_prepare_cached_reexecute.t ....
1..32
ok 1 - The object isa DBI::db
ok 2 - CREATE TABLE
ok 3 - insert 1
ok 4 - insert 2
ok 5 - The object isa DBI::db
ok 6 - No warnings
ok 7 - The object isa DBI::db
ok 8 - No warnings
ok 9 - The object isa DBI::db
ok 10 - Got row 1
ok 11 - No warnings
ok 12 - The object isa DBI::db
ok 13 - Got row 1
ok 14 - Got row 1
ok 15 - No warnings
ok 16 - The object isa DBI::db
ok 17 - Got row 1
ok 18 - Got a warning
ok 19 - The object isa DBI::db
ok 20 - No warnings
ok 21 - The object isa DBI::db
ok 22 - Got row 1
ok 23 - No warnings
ok 24 - The object isa DBI::db
ok 25 - Got row 1
ok 26 - Got row 1
ok 27 - No warnings
ok 28 - The object isa DBI::db
ok 29 - Got row 1
ok 30 - Got row 1
ok 31 - No warnings
ok 32 - no warnings
ok
t/rt_36836_duplicate_key.t ...............
1..5
ok 1 - The object isa DBI::db
ok 2 - create table
ok 3 - insert
ok 4 - duplicate
ok 5 - no warnings
ok
t/rt_36838_unique_and_bus_error.t ........
1..4
ok 1 - The object isa DBI::db
ok 2
ok 3 - DBD::SQLite::db do failed: constraint failed
# column num is not unique at t/rt_36838_unique_and_bus_error.t line 19.
#
ok 4 - no warnings
ok
t/rt_40594_nullable.t ....................
1..7
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok
t/rt_48393_debug_panic_with_commit.t ..... skipped: set $ENV{TEST_DBD_SQLITE_WITH_DEBUGGER} to enable this test
t/rt_50503_fts3.t ........................
1..6
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6 - no warnings
ok
t/rt_52573_manual_exclusive_lock.t .......
1..370
ok 1 - The object isa DBI::db
ok 2 - AutoCommit is on
ok 3 - BegunWork is off
ok 4 - a statement works
ok 5 - AutoCommit is still on
ok 6 - BegunWork is still off
ok 7 - begin_work works
ok 8 - AutoCommit is turned off
ok 9 - BegunWork is turned on
ok 10 - but second begin_work should fail
ok 11 - other statement should work
ok 12 - rolled back/committed
ok 13 - AutoCommit is turned on
ok 14 - BegunWork is turned off
ok 15 - begin_work works
ok 16 - AutoCommit is turned off
ok 17 - BegunWork is turned on
ok 18 - first BEGIN should be passed through
ok 19 - second BEGIN should fail
ok 20 - and second begin_work also should fail
ok 21 - other statement should work
ok 22 - rolled back/committed
ok 23 - AutoCommit is turned on now
ok 24 - BegunWork is turned off
ok 25 - begin_work works
ok 26 - AutoCommit is turned off
ok 27 - BegunWork is turned on
ok 28 - statement should work
ok 29 - BEGIN after other statements should fail
ok 30 - and second begin_work also should fail
ok 31 - other statement should work
ok 32 - rolled back/committed
ok 33 - AutoCommit is turned on now
ok 34 - BegunWork is turned off
ok 35 - AutoCommit is on
ok 36 - BegunWork is off
ok 37 - BEGIN should work
ok 38 - AutoCommit is turned off
ok 39 - BegunWork is turned on
ok 40 - second BEGIN should fail
ok 41 - other statement should work
ok 42 - rolled back/committed
ok 43 - AutoCommit is turned on now
ok 44 - BegunWork is turned off
ok 45 - AutoCommit is on
ok 46 - BegunWork is off
ok 47 - BEGIN should work
ok 48 - AutoCommit is turned off
ok 49 - BegunWork is turned on
ok 50 - second BEGIN should fail
ok 51 - and second begin_work also should fail
ok 52 - other statement should work
ok 53 - rolled back/committed
ok 54 - AutoCommit is turned on now
ok 55 - BegunWork is turned off
ok 56 - AutoCommit is on
ok 57 - BegunWork is off
ok 58 - AutoCommit is turned off
ok 59 - BegunWork is still off
ok 60 - BEGIN should work
ok 61 - AutoCommit is turned off
ok 62 - BegunWork is still off
ok 63 - second BEGIN should fail
ok 64 - and begin_work also should fail
ok 65 - other statement should work
ok 66 - rolled back/committed
ok 67 - AutoCommit is still off
ok 68 - BegunWork is still off
ok 69 - AutoCommit is on
ok 70 - BegunWork is off
ok 71 - AutoCommit is turned off
ok 72 - BegunWork is still off
ok 73 - begin_work should fail
ok 74 - AutoCommit is still off
ok 75 - BegunWork is still off
ok 76 - BEGIN should work
ok 77 - AutoCommit is still off
ok 78 - BegunWork is still off
ok 79 - and second begin_work also should fail
ok 80 - other statement should work
ok 81 - rolled back/committed
ok 82 - AutoCommit is still off
ok 83 - BegunWork is still off
ok 84 - AutoCommit is on
ok 85 - BegunWork is off
ok 86 - AutoCommit is turned off
ok 87 - BegunWork is still off
ok 88 - other statement should work
ok 89 - AutoCommit is still off
ok 90 - BegunWork is still off
ok 91 - rolled back/committed
ok 92 - AutoCommit is still off
ok 93 - BegunWork is still off
ok 94 - AutoCommit is on
ok 95 - BegunWork is off
ok 96 - a statement works
ok 97 - AutoCommit is still on
ok 98 - BegunWork is still off
ok 99 - begin_work works
ok 100 - AutoCommit is turned off
ok 101 - BegunWork is turned on
ok 102 - but second begin_work should fail
ok 103 - other statement should work
ok 104 - rolled back/committed
ok 105 - AutoCommit is turned on
ok 106 - BegunWork is turned off
ok 107 - begin_work works
ok 108 - AutoCommit is turned off
ok 109 - BegunWork is turned on
ok 110 - first BEGIN should be passed through
ok 111 - second BEGIN should fail
ok 112 - and second begin_work also should fail
ok 113 - other statement should work
ok 114 - rolled back/committed
ok 115 - AutoCommit is turned on now
ok 116 - BegunWork is turned off
ok 117 - begin_work works
ok 118 - AutoCommit is turned off
ok 119 - BegunWork is turned on
ok 120 - statement should work
ok 121 - BEGIN after other statements should fail
ok 122 - and second begin_work also should fail
ok 123 - other statement should work
ok 124 - rolled back/committed
ok 125 - AutoCommit is turned on now
ok 126 - BegunWork is turned off
ok 127 - AutoCommit is on
ok 128 - BegunWork is off
ok 129 - BEGIN should work
ok 130 - AutoCommit is turned off
ok 131 - BegunWork is turned on
ok 132 - second BEGIN should fail
ok 133 - other statement should work
ok 134 - rolled back/committed
ok 135 - AutoCommit is turned on now
ok 136 - BegunWork is turned off
ok 137 - AutoCommit is on
ok 138 - BegunWork is off
ok 139 - BEGIN should work
ok 140 - AutoCommit is turned off
ok 141 - BegunWork is turned on
ok 142 - second BEGIN should fail
ok 143 - and second begin_work also should fail
ok 144 - other statement should work
ok 145 - rolled back/committed
ok 146 - AutoCommit is turned on now
ok 147 - BegunWork is turned off
ok 148 - AutoCommit is on
ok 149 - BegunWork is off
ok 150 - AutoCommit is turned off
ok 151 - BegunWork is still off
ok 152 - BEGIN should work
ok 153 - AutoCommit is turned off
ok 154 - BegunWork is still off
ok 155 - second BEGIN should fail
ok 156 - and begin_work also should fail
ok 157 - other statement should work
ok 158 - rolled back/committed
ok 159 - AutoCommit is still off
ok 160 - BegunWork is still off
ok 161 - AutoCommit is on
ok 162 - BegunWork is off
ok 163 - AutoCommit is turned off
ok 164 - BegunWork is still off
ok 165 - begin_work should fail
ok 166 - AutoCommit is still off
ok 167 - BegunWork is still off
ok 168 - BEGIN should work
ok 169 - AutoCommit is still off
ok 170 - BegunWork is still off
ok 171 - and second begin_work also should fail
ok 172 - other statement should work
ok 173 - rolled back/committed
ok 174 - AutoCommit is still off
ok 175 - BegunWork is still off
ok 176 - AutoCommit is on
ok 177 - BegunWork is off
ok 178 - AutoCommit is turned off
ok 179 - BegunWork is still off
ok 180 - other statement should work
ok 181 - AutoCommit is still off
ok 182 - BegunWork is still off
ok 183 - rolled back/committed
ok 184 - AutoCommit is still off
ok 185 - BegunWork is still off
ok 186 - AutoCommit is on
ok 187 - BegunWork is off
ok 188 - a statement works
ok 189 - AutoCommit is still on
ok 190 - BegunWork is still off
ok 191 - begin_work works
ok 192 - AutoCommit is turned off
ok 193 - BegunWork is turned on
ok 194 - but second begin_work should fail
ok 195 - other statement should work
ok 196 - rolled back/committed
ok 197 - AutoCommit is turned on
ok 198 - BegunWork is turned off
ok 199 - begin_work works
ok 200 - AutoCommit is turned off
ok 201 - BegunWork is turned on
ok 202 - first BEGIN should be passed through
ok 203 - second BEGIN should fail
ok 204 - and second begin_work also should fail
ok 205 - other statement should work
ok 206 - rolled back/committed
ok 207 - AutoCommit is turned on now
ok 208 - BegunWork is turned off
ok 209 - begin_work works
ok 210 - AutoCommit is turned off
ok 211 - BegunWork is turned on
ok 212 - statement should work
ok 213 - BEGIN after other statements should fail
ok 214 - and second begin_work also should fail
ok 215 - other statement should work
ok 216 - rolled back/committed
ok 217 - AutoCommit is turned on now
ok 218 - BegunWork is turned off
ok 219 - AutoCommit is on
ok 220 - BegunWork is off
ok 221 - BEGIN should work
ok 222 - AutoCommit is turned off
ok 223 - BegunWork is turned on
ok 224 - second BEGIN should fail
ok 225 - other statement should work
ok 226 - rolled back/committed
ok 227 - AutoCommit is turned on now
ok 228 - BegunWork is turned off
ok 229 - AutoCommit is on
ok 230 - BegunWork is off
ok 231 - BEGIN should work
ok 232 - AutoCommit is turned off
ok 233 - BegunWork is turned on
ok 234 - second BEGIN should fail
ok 235 - and second begin_work also should fail
ok 236 - other statement should work
ok 237 - rolled back/committed
ok 238 - AutoCommit is turned on now
ok 239 - BegunWork is turned off
ok 240 - AutoCommit is on
ok 241 - BegunWork is off
ok 242 - AutoCommit is turned off
ok 243 - BegunWork is still off
ok 244 - BEGIN should work
ok 245 - AutoCommit is turned off
ok 246 - BegunWork is still off
ok 247 - second BEGIN should fail
ok 248 - and begin_work also should fail
ok 249 - other statement should work
ok 250 - rolled back/committed
ok 251 - AutoCommit is still off
ok 252 - BegunWork is still off
ok 253 - AutoCommit is on
ok 254 - BegunWork is off
ok 255 - AutoCommit is turned off
ok 256 - BegunWork is still off
ok 257 - begin_work should fail
ok 258 - AutoCommit is still off
ok 259 - BegunWork is still off
ok 260 - BEGIN should work
ok 261 - AutoCommit is still off
ok 262 - BegunWork is still off
ok 263 - and second begin_work also should fail
ok 264 - other statement should work
ok 265 - rolled back/committed
ok 266 - AutoCommit is still off
ok 267 - BegunWork is still off
ok 268 - AutoCommit is on
ok 269 - BegunWork is off
ok 270 - AutoCommit is turned off
ok 271 - BegunWork is still off
ok 272 - other statement should work
ok 273 - AutoCommit is still off
ok 274 - BegunWork is still off
ok 275 - rolled back/committed
ok 276 - AutoCommit is still off
ok 277 - BegunWork is still off
ok 278 - AutoCommit is on
ok 279 - BegunWork is off
ok 280 - a statement works
ok 281 - AutoCommit is still on
ok 282 - BegunWork is still off
ok 283 - begin_work works
ok 284 - AutoCommit is turned off
ok 285 - BegunWork is turned on
ok 286 - but second begin_work should fail
ok 287 - other statement should work
ok 288 - rolled back/committed
ok 289 - AutoCommit is turned on
ok 290 - BegunWork is turned off
ok 291 - begin_work works
ok 292 - AutoCommit is turned off
ok 293 - BegunWork is turned on
ok 294 - first BEGIN should be passed through
ok 295 - second BEGIN should fail
ok 296 - and second begin_work also should fail
ok 297 - other statement should work
ok 298 - rolled back/committed
ok 299 - AutoCommit is turned on now
ok 300 - BegunWork is turned off
ok 301 - begin_work works
ok 302 - AutoCommit is turned off
ok 303 - BegunWork is turned on
ok 304 - statement should work
ok 305 - BEGIN after other statements should fail
ok 306 - and second begin_work also should fail
ok 307 - other statement should work
ok 308 - rolled back/committed
ok 309 - AutoCommit is turned on now
ok 310 - BegunWork is turned off
ok 311 - AutoCommit is on
ok 312 - BegunWork is off
ok 313 - BEGIN should work
ok 314 - AutoCommit is turned off
ok 315 - BegunWork is turned on
ok 316 - second BEGIN should fail
ok 317 - other statement should work
ok 318 - rolled back/committed
ok 319 - AutoCommit is turned on now
ok 320 - BegunWork is turned off
ok 321 - AutoCommit is on
ok 322 - BegunWork is off
ok 323 - BEGIN should work
ok 324 - AutoCommit is turned off
ok 325 - BegunWork is turned on
ok 326 - second BEGIN should fail
ok 327 - and second begin_work also should fail
ok 328 - other statement should work
ok 329 - rolled back/committed
ok 330 - AutoCommit is turned on now
ok 331 - BegunWork is turned off
ok 332 - AutoCommit is on
ok 333 - BegunWork is off
ok 334 - AutoCommit is turned off
ok 335 - BegunWork is still off
ok 336 - BEGIN should work
ok 337 - AutoCommit is turned off
ok 338 - BegunWork is still off
ok 339 - second BEGIN should fail
ok 340 - and begin_work also should fail
ok 341 - other statement should work
ok 342 - rolled back/committed
ok 343 - AutoCommit is still off
ok 344 - BegunWork is still off
ok 345 - AutoCommit is on
ok 346 - BegunWork is off
ok 347 - AutoCommit is turned off
ok 348 - BegunWork is still off
ok 349 - begin_work should fail
ok 350 - AutoCommit is still off
ok 351 - BegunWork is still off
ok 352 - BEGIN should work
ok 353 - AutoCommit is still off
ok 354 - BegunWork is still off
ok 355 - and second begin_work also should fail
ok 356 - other statement should work
ok 357 - rolled back/committed
ok 358 - AutoCommit is still off
ok 359 - BegunWork is still off
ok 360 - AutoCommit is on
ok 361 - BegunWork is off
ok 362 - AutoCommit is turned off
ok 363 - BegunWork is still off
ok 364 - other statement should work
ok 365 - AutoCommit is still off
ok 366 - BegunWork is still off
ok 367 - rolled back/committed
ok 368 - AutoCommit is still off
ok 369 - BegunWork is still off
ok 370 - no warnings
ok
t/rt_53235_icu_compatibility.t ........... skipped: requires SQLite ICU plugin to be enabled
All tests successful.
Files=59, Tests=1170, 11 wallclock secs ( 0.25 usr + 0.05 sys = 0.30 CPU)
Result: PASS
ADAMK/DBD-SQLite-1.31.tar.gz
nmake test TEST_VERBOSE=1 -- OK
Adam Kennedy <adamk@cpan.org>
Self Contained SQLite RDBMS in a DBI Driver
>>> (cd C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt && tar cvf - DBD-SQLite-1.31.ppd blib) | gzip -c >C:/cpanfly/var/REPO/A/AD/ADAMK/DBD-SQLite-1.31.tar.gz
DBD-SQLite-1.31.ppd
blib/
blib/arch/
blib/arch/auto/
blib/arch/auto/DBD/
blib/arch/auto/DBD/SQLite/
blib/arch/auto/DBD/SQLite/SQLite.bs
blib/arch/auto/DBD/SQLite/SQLite.dll
blib/arch/auto/DBD/SQLite/SQLite.exp
blib/arch/auto/DBD/SQLite/SQLite.lib
blib/lib/
blib/lib/auto/
blib/lib/auto/share/
blib/lib/auto/share/dist/
blib/lib/auto/share/dist/DBD-SQLite/
blib/lib/auto/share/dist/DBD-SQLite/sqlite3.c
blib/lib/auto/share/dist/DBD-SQLite/sqlite3.h
blib/lib/DBD/
blib/lib/DBD/SQLite/
blib/lib/DBD/SQLite/Cookbook.pod
blib/lib/DBD/SQLite.pm
>>> mv C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/DBD-SQLite-1.31.ppd C:/cpanfly/var/REPO/A/AD/ADAMK
Megalib: Undefined subroutine &Digest::base::new called at C:\cpanfly\lib/ActivePerl/PPM/InstallArea.pm line 902.
Running test for module 'DBI'
Running make for T/TI/TIMB/DBI-1.615.tar.gz
Prepending C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/arch C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/lib to PERL5LIB for 'get'
Checksum for C:\cpanfly\var\cpan\sources\authors\id\T\TI\TIMB\DBI-1.615.tar.gz ok
Will not use Archive::Tar, need 1.00
DBI-1.615/
DBI-1.615/Changes
DBI-1.615/dbd_xsh.h
DBI-1.615/DBI.pm
DBI-1.615/DBI.xs
DBI-1.615/dbi_sql.h
DBI-1.615/dbilogstrip.PL
DBI-1.615/dbipport.h
DBI-1.615/dbiprof.PL
DBI-1.615/dbiproxy.PL
DBI-1.615/dbivport.h
DBI-1.615/DBIXS.h
DBI-1.615/dbixs_rev.h
DBI-1.615/dbixs_rev.pl
DBI-1.615/Driver.xst
DBI-1.615/Driver_xst.h
DBI-1.615/ex/
DBI-1.615/lib/
DBI-1.615/Makefile.PL
DBI-1.615/MANIFEST
DBI-1.615/META.yml
DBI-1.615/Perl.xs
DBI-1.615/README
DBI-1.615/t/
DBI-1.615/test.pl
DBI-1.615/TODO_2005.txt
DBI-1.615/TODO_gofer.txt
DBI-1.615/typemap
DBI-1.615/t/01basics.t
DBI-1.615/t/02dbidrv.t
DBI-1.615/t/03handle.t
DBI-1.615/t/04mods.t
DBI-1.615/t/05concathash.t
DBI-1.615/t/06attrs.t
DBI-1.615/t/07kids.t
DBI-1.615/t/08keeperr.t
DBI-1.615/t/09trace.t
DBI-1.615/t/10examp.t
DBI-1.615/t/11fetch.t
DBI-1.615/t/12quote.t
DBI-1.615/t/13taint.t
DBI-1.615/t/14utf8.t
DBI-1.615/t/15array.t
DBI-1.615/t/16destroy.t
DBI-1.615/t/19fhtrace.t
DBI-1.615/t/20meta.t
DBI-1.615/t/30subclass.t
DBI-1.615/t/35thrclone.t
DBI-1.615/t/40profile.t
DBI-1.615/t/41prof_dump.t
DBI-1.615/t/42prof_data.t
DBI-1.615/t/43prof_env.t
DBI-1.615/t/49dbd_file.t
DBI-1.615/t/50dbm_simple.t
DBI-1.615/t/51dbm_file.t
DBI-1.615/t/52dbm_complex.t
DBI-1.615/t/60preparse.t
DBI-1.615/t/65transact.t
DBI-1.615/t/70callbacks.t
DBI-1.615/t/72childhandles.t
DBI-1.615/t/80proxy.t
DBI-1.615/t/85gofer.t
DBI-1.615/t/86gofer_fail.t
DBI-1.615/t/87gofer_cache.t
DBI-1.615/t/90sql_type_cast.t
DBI-1.615/t/lib.pl
DBI-1.615/t/pod-coverage.t
DBI-1.615/t/pod.t
DBI-1.615/lib/Bundle/
DBI-1.615/lib/DBD/
DBI-1.615/lib/DBI/
DBI-1.615/lib/Win32/
DBI-1.615/lib/Win32/DBIODBC.pm
DBI-1.615/lib/DBI/Const/
DBI-1.615/lib/DBI/DBD/
DBI-1.615/lib/DBI/DBD.pm
DBI-1.615/lib/DBI/FAQ.pm
DBI-1.615/lib/DBI/Gofer/
DBI-1.615/lib/DBI/Profile.pm
DBI-1.615/lib/DBI/ProfileData.pm
DBI-1.615/lib/DBI/ProfileDumper/
DBI-1.615/lib/DBI/ProfileDumper.pm
DBI-1.615/lib/DBI/ProfileSubs.pm
DBI-1.615/lib/DBI/ProxyServer.pm
DBI-1.615/lib/DBI/PurePerl.pm
DBI-1.615/lib/DBI/SQL/
DBI-1.615/lib/DBI/Util/
DBI-1.615/lib/DBI/W32ODBC.pm
DBI-1.615/lib/DBI/Util/_accessor.pm
DBI-1.615/lib/DBI/Util/CacheMemory.pm
DBI-1.615/lib/DBI/SQL/Nano.pm
DBI-1.615/lib/DBI/ProfileDumper/Apache.pm
DBI-1.615/lib/DBI/Gofer/Execute.pm
DBI-1.615/lib/DBI/Gofer/Request.pm
DBI-1.615/lib/DBI/Gofer/Response.pm
DBI-1.615/lib/DBI/Gofer/Serializer/
DBI-1.615/lib/DBI/Gofer/Transport/
DBI-1.615/lib/DBI/Gofer/Transport/Base.pm
DBI-1.615/lib/DBI/Gofer/Transport/pipeone.pm
DBI-1.615/lib/DBI/Gofer/Transport/stream.pm
DBI-1.615/lib/DBI/Gofer/Serializer/Base.pm
DBI-1.615/lib/DBI/Gofer/Serializer/DataDumper.pm
DBI-1.615/lib/DBI/Gofer/Serializer/Storable.pm
DBI-1.615/lib/DBI/DBD/Metadata.pm
DBI-1.615/lib/DBI/DBD/SqlEngine/
DBI-1.615/lib/DBI/DBD/SqlEngine.pm
DBI-1.615/lib/DBI/DBD/SqlEngine/Developers.pod
DBI-1.615/lib/DBI/DBD/SqlEngine/HowTo.pod
DBI-1.615/lib/DBI/Const/GetInfo/
DBI-1.615/lib/DBI/Const/GetInfoReturn.pm
DBI-1.615/lib/DBI/Const/GetInfoType.pm
DBI-1.615/lib/DBI/Const/GetInfo/ANSI.pm
DBI-1.615/lib/DBI/Const/GetInfo/ODBC.pm
DBI-1.615/lib/DBD/DBM.pm
DBI-1.615/lib/DBD/ExampleP.pm
DBI-1.615/lib/DBD/File/
DBI-1.615/lib/DBD/File.pm
DBI-1.615/lib/DBD/Gofer/
DBI-1.615/lib/DBD/Gofer.pm
DBI-1.615/lib/DBD/NullP.pm
DBI-1.615/lib/DBD/Proxy.pm
DBI-1.615/lib/DBD/Sponge.pm
DBI-1.615/lib/DBD/Gofer/Policy/
DBI-1.615/lib/DBD/Gofer/Transport/
DBI-1.615/lib/DBD/Gofer/Transport/Base.pm
DBI-1.615/lib/DBD/Gofer/Transport/null.pm
DBI-1.615/lib/DBD/Gofer/Transport/pipeone.pm
DBI-1.615/lib/DBD/Gofer/Transport/stream.pm
DBI-1.615/lib/DBD/Gofer/Policy/Base.pm
DBI-1.615/lib/DBD/Gofer/Policy/classic.pm
DBI-1.615/lib/DBD/Gofer/Policy/pedantic.pm
DBI-1.615/lib/DBD/Gofer/Policy/rush.pm
DBI-1.615/lib/DBD/File/Developers.pod
DBI-1.615/lib/DBD/File/HowTo.pod
DBI-1.615/lib/DBD/File/Roadmap.pod
DBI-1.615/lib/Bundle/DBI.pm
DBI-1.615/ex/perl_dbi_nulls_test.pl
DBI-1.615/ex/profile.pl
Prepending C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/arch C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/lib to PERL5LIB for 'make'
CPAN.pm: Going to build T/TI/TIMB/DBI-1.615.tar.gz
>>> C:\Perl64\bin\perl.exe Makefile.PL
*** You are using a perl configured with threading enabled.
*** You should be aware that using multiple threads is
*** not recommended for production environments.
Creating test wrappers for DBD::Gofer:
t/zvg_01basics.t
t/zvg_02dbidrv.t
t/zvg_03handle.t
t/zvg_04mods.t
t/zvg_05concathash.t
t/zvg_06attrs.t
t/zvg_07kids.t
t/zvg_08keeperr.t
t/zvg_09trace.t
t/zvg_10examp.t
t/zvg_11fetch.t
t/zvg_12quote.t
t/zvg_13taint.t
t/zvg_14utf8.t
t/zvg_15array.t
t/zvg_16destroy.t
t/zvg_19fhtrace.t
t/zvg_20meta.t
t/zvg_30subclass.t
t/zvg_35thrclone.t (use threads)
t/zvg_40profile.t
t/zvg_41prof_dump.t
t/zvg_42prof_data.t
t/zvg_43prof_env.t
t/zvg_49dbd_file.t
t/zvg_50dbm_simple.t
t/zvg_51dbm_file.t
t/zvg_52dbm_complex.t
t/zvg_60preparse.t
t/zvg_65transact.t
t/zvg_70callbacks.t
t/zvg_72childhandles.t
t/zvg_80proxy.t
t/zvg_85gofer.t
t/zvg_86gofer_fail.t
t/zvg_87gofer_cache.t
t/zvg_90sql_type_cast.t
Creating test wrappers for DBI::SQL::Nano:
t/zvn_49dbd_file.t
t/zvn_50dbm_simple.t
t/zvn_51dbm_file.t
t/zvn_52dbm_complex.t
t/zvn_85gofer.t
Creating test wrappers for DBI::PurePerl:
t/zvp_01basics.t
t/zvp_02dbidrv.t
t/zvp_03handle.t
t/zvp_04mods.t
t/zvp_05concathash.t
t/zvp_06attrs.t
t/zvp_07kids.t
t/zvp_08keeperr.t
t/zvp_09trace.t
t/zvp_10examp.t
t/zvp_11fetch.t
t/zvp_12quote.t
t/zvp_13taint.t
t/zvp_14utf8.t
t/zvp_15array.t
t/zvp_16destroy.t
t/zvp_19fhtrace.t
t/zvp_20meta.t
t/zvp_30subclass.t
t/zvp_35thrclone.t (use threads)
t/zvp_40profile.t
t/zvp_41prof_dump.t
t/zvp_42prof_data.t
t/zvp_43prof_env.t
t/zvp_49dbd_file.t
t/zvp_50dbm_simple.t
t/zvp_51dbm_file.t
t/zvp_52dbm_complex.t
t/zvp_60preparse.t
t/zvp_65transact.t
t/zvp_70callbacks.t
t/zvp_72childhandles.t
t/zvp_80proxy.t
t/zvp_85gofer.t
t/zvp_86gofer_fail.t
t/zvp_87gofer_cache.t
t/zvp_90sql_type_cast.t
Creating test wrappers for DBD::Gofer + DBI::SQL::Nano:
t/zvxgn_49dbd_file.t
t/zvxgn_50dbm_simple.t
t/zvxgn_51dbm_file.t
t/zvxgn_52dbm_complex.t
t/zvxgn_85gofer.t
Creating test wrappers for DBD::Gofer + DBI::PurePerl:
t/zvxgp_01basics.t
t/zvxgp_02dbidrv.t
t/zvxgp_03handle.t
t/zvxgp_04mods.t
t/zvxgp_05concathash.t
t/zvxgp_06attrs.t
t/zvxgp_07kids.t
t/zvxgp_08keeperr.t
t/zvxgp_09trace.t
t/zvxgp_10examp.t
t/zvxgp_11fetch.t
t/zvxgp_12quote.t
t/zvxgp_13taint.t
t/zvxgp_14utf8.t
t/zvxgp_15array.t
t/zvxgp_16destroy.t
t/zvxgp_19fhtrace.t
t/zvxgp_20meta.t
t/zvxgp_30subclass.t
t/zvxgp_35thrclone.t (use threads)
t/zvxgp_40profile.t
t/zvxgp_41prof_dump.t
t/zvxgp_42prof_data.t
t/zvxgp_43prof_env.t
t/zvxgp_49dbd_file.t
t/zvxgp_50dbm_simple.t
t/zvxgp_51dbm_file.t
t/zvxgp_52dbm_complex.t
t/zvxgp_60preparse.t
t/zvxgp_65transact.t
t/zvxgp_70callbacks.t
t/zvxgp_72childhandles.t
t/zvxgp_80proxy.t
t/zvxgp_85gofer.t
t/zvxgp_86gofer_fail.t
t/zvxgp_87gofer_cache.t
t/zvxgp_90sql_type_cast.t
Creating test wrappers for DBI::SQL::Nano + DBI::PurePerl:
t/zvxnp_49dbd_file.t
t/zvxnp_50dbm_simple.t
t/zvxnp_51dbm_file.t
t/zvxnp_52dbm_complex.t
t/zvxnp_85gofer.t
Creating test wrappers for DBD::Gofer + DBI::SQL::Nano + DBI::PurePerl:
t/zvxgnp_49dbd_file.t
t/zvxgnp_50dbm_simple.t
t/zvxgnp_51dbm_file.t
t/zvxgnp_52dbm_complex.t
t/zvxgnp_85gofer.t
***
This version of DBI conflicts with the version of
module DBD::AnyData (0.09) you have installed.
It's strongly recommended that you update it after
installing this version of DBI.
***
***
This version of DBI conflicts with the version of
module DBD::CSV (0.22) you have installed.
It's strongly recommended that you update it after
installing this version of DBI.
***
***
This version of DBI conflicts with the version of
module DBD::PO (0.02) you have installed.
It's strongly recommended that you update it after
installing this version of DBI.
***
***
This version of DBI conflicts with the version of
module SQL::Statement (1.15) you have installed.
It's strongly recommended that you update it after
installing this version of DBI.
***
Checking if your kit is complete...
Looks good
Warning: By default new modules are installed into your 'site_lib'
directories. Since site_lib directories come after the normal library
directories you must delete old DBI files and directories from your
'privlib' and 'archlib' directories and their auto subdirectories.
Reinstall DBI and your DBD::* drivers after deleting the old directories.
Here's a list of probable old files and directories:
C:/Perl64/lib/Bundle/DBD
C:/Perl64/lib/Bundle/DBI.pm
C:/Perl64/lib/DBD
C:/Perl64/lib/DBI
C:/Perl64/lib/DBI.pm
C:/Perl64/lib/DBI/Changes.pm
C:/Perl64/lib/DBI/Const
C:/Perl64/lib/DBI/Const/GetInfo
C:/Perl64/lib/DBI/Const/GetInfo/ANSI.pm
C:/Perl64/lib/DBI/Const/GetInfo/ODBC.pm
C:/Perl64/lib/DBI/Const/GetInfoReturn.pm
C:/Perl64/lib/DBI/Const/GetInfoType.pm
C:/Perl64/lib/DBI/DBD
C:/Perl64/lib/DBI/DBD.pm
C:/Perl64/lib/DBI/DBD/Metadata.pm
C:/Perl64/lib/DBI/FAQ.pm
C:/Perl64/lib/DBI/Gofer
C:/Perl64/lib/DBI/Gofer/Execute.pm
C:/Perl64/lib/DBI/Gofer/Request.pm
C:/Perl64/lib/DBI/Gofer/Response.pm
C:/Perl64/lib/DBI/Gofer/Serializer
C:/Perl64/lib/DBI/Gofer/Serializer/Base.pm
C:/Perl64/lib/DBI/Gofer/Serializer/DataDumper.pm
C:/Perl64/lib/DBI/Gofer/Serializer/Storable.pm
C:/Perl64/lib/DBI/Gofer/Transport
C:/Perl64/lib/DBI/Gofer/Transport/Base.pm
C:/Perl64/lib/DBI/Gofer/Transport/pipeone.pm
C:/Perl64/lib/DBI/Gofer/Transport/stream.pm
C:/Perl64/lib/DBI/Profile.pm
C:/Perl64/lib/DBI/ProfileData.pm
C:/Perl64/lib/DBI/ProfileDumper
C:/Perl64/lib/DBI/ProfileDumper.pm
C:/Perl64/lib/DBI/ProfileDumper/Apache.pm
C:/Perl64/lib/DBI/ProfileSubs.pm
C:/Perl64/lib/DBI/ProxyServer.pm
C:/Perl64/lib/DBI/PurePerl.pm
C:/Perl64/lib/DBI/Roadmap.pm
C:/Perl64/lib/DBI/SQL
C:/Perl64/lib/DBI/SQL/Nano.pm
C:/Perl64/lib/DBI/Util
C:/Perl64/lib/DBI/Util/CacheMemory.pm
C:/Perl64/lib/DBI/Util/_accessor.pm
C:/Perl64/lib/DBI/W32ODBC.pm
C:/Perl64/lib/Win32/DBIODBC.pm
C:/Perl64/lib/auto/DBD
C:/Perl64/lib/auto/DBI
C:/Perl64/lib/auto/DBI/.packlist
C:/Perl64/lib/auto/DBI/DBI.bs
C:/Perl64/lib/auto/DBI/DBI.dll
C:/Perl64/lib/auto/DBI/DBI.exp
C:/Perl64/lib/auto/DBI/DBI.lib
C:/Perl64/lib/auto/DBI/DBIXS.h
C:/Perl64/lib/auto/DBI/Driver.xst
C:/Perl64/lib/auto/DBI/Driver_xst.h
C:/Perl64/lib/auto/DBI/dbd_xsh.h
C:/Perl64/lib/auto/DBI/dbi_sql.h
C:/Perl64/lib/auto/DBI/dbipport.h
C:/Perl64/lib/auto/DBI/dbivport.h
C:/Perl64/lib/auto/DBI/dbixs_rev.h
I see you're using perl 5.010000 on MSWin32-x64-multi-thread, okay.
Remember to actually *read* the README file!
Use 'make' to build the software (dmake or nmake on Windows).
Then 'make test' to execute self tests.
Then 'make install' to install the DBI and then delete this working
directory before unpacking and building any DBD::* drivers.
Windows users need to use the correct make command.
That may be nmake or dmake depending on which Perl you are using.
If using the Win32 ActiveState build then it is recommended that you
use the ppm utility to fetch and install a prebuilt DBI instead.
Writing Makefile for DBI
>>> nmake
Microsoft (R) Program Maintenance Utility Version 7.00.8882
Copyright (C) Microsoft Corp 1988-2000. All rights reserved.
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "mkpath" -- blib\lib\DBI
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "rm_f" -- blib\lib\DBI\Changes.pm
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "cp" -- Changes blib\lib\DBI\Changes.pm
cp Driver_xst.h blib\arch\auto\DBI\Driver_xst.h
cp lib/DBD/Proxy.pm blib\lib\DBD\Proxy.pm
cp lib/DBI/Gofer/Response.pm blib\lib\DBI\Gofer\Response.pm
cp lib/DBI/Gofer/Transport/Base.pm blib\lib\DBI\Gofer\Transport\Base.pm
cp lib/DBI/Util/_accessor.pm blib\lib\DBI\Util\_accessor.pm
cp lib/DBD/DBM.pm blib\lib\DBD\DBM.pm
cp DBIXS.h blib\arch\auto\DBI\DBIXS.h
cp dbixs_rev.pl blib\lib\dbixs_rev.pl
cp lib/DBI/Const/GetInfoType.pm blib\lib\DBI\Const\GetInfoType.pm
cp lib/DBI/Gofer/Serializer/DataDumper.pm blib\lib\DBI\Gofer\Serializer\DataDumper.pm
cp lib/DBI/DBD/Metadata.pm blib\lib\DBI\DBD\Metadata.pm
cp lib/DBD/Gofer/Transport/pipeone.pm blib\lib\DBD\Gofer\Transport\pipeone.pm
cp lib/DBI/Const/GetInfo/ODBC.pm blib\lib\DBI\Const\GetInfo\ODBC.pm
cp lib/DBI/ProfileDumper/Apache.pm blib\lib\DBI\ProfileDumper\Apache.pm
cp lib/DBD/File/Roadmap.pod blib\lib\DBD\File\Roadmap.pod
cp Driver.xst blib\arch\auto\DBI\Driver.xst
cp lib/DBD/File.pm blib\lib\DBD\File.pm
cp lib/DBI/Util/CacheMemory.pm blib\lib\DBI\Util\CacheMemory.pm
cp lib/DBD/NullP.pm blib\lib\DBD\NullP.pm
cp lib/DBI/ProfileSubs.pm blib\lib\DBI\ProfileSubs.pm
cp dbi_sql.h blib\arch\auto\DBI\dbi_sql.h
cp lib/DBD/Gofer.pm blib\lib\DBD\Gofer.pm
cp lib/DBI/DBD/SqlEngine/HowTo.pod blib\lib\DBI\DBD\SqlEngine\HowTo.pod
cp dbd_xsh.h blib\arch\auto\DBI\dbd_xsh.h
cp dbivport.h blib\arch\auto\DBI\dbivport.h
cp lib/DBI/FAQ.pm blib\lib\DBI\FAQ.pm
cp lib/DBD/Gofer/Transport/Base.pm blib\lib\DBD\Gofer\Transport\Base.pm
cp dbixs_rev.h blib\arch\auto\DBI\dbixs_rev.h
cp lib/DBD/Gofer/Policy/rush.pm blib\lib\DBD\Gofer\Policy\rush.pm
cp lib/DBI/SQL/Nano.pm blib\lib\DBI\SQL\Nano.pm
cp lib/DBI/Const/GetInfo/ANSI.pm blib\lib\DBI\Const\GetInfo\ANSI.pm
cp lib/DBI/Gofer/Request.pm blib\lib\DBI\Gofer\Request.pm
cp lib/DBD/Gofer/Transport/stream.pm blib\lib\DBD\Gofer\Transport\stream.pm
cp lib/DBD/Gofer/Policy/classic.pm blib\lib\DBD\Gofer\Policy\classic.pm
cp lib/DBI/Const/GetInfoReturn.pm blib\lib\DBI\Const\GetInfoReturn.pm
cp lib/DBD/Gofer/Policy/Base.pm blib\lib\DBD\Gofer\Policy\Base.pm
cp DBI.pm blib\lib\DBI.pm
cp lib/DBI/Gofer/Serializer/Storable.pm blib\lib\DBI\Gofer\Serializer\Storable.pm
cp lib/DBI/Gofer/Transport/stream.pm blib\lib\DBI\Gofer\Transport\stream.pm
cp lib/DBD/Sponge.pm blib\lib\DBD\Sponge.pm
cp lib/DBD/Gofer/Policy/pedantic.pm blib\lib\DBD\Gofer\Policy\pedantic.pm
cp lib/DBD/File/HowTo.pod blib\lib\DBD\File\HowTo.pod
cp lib/DBI/Gofer/Transport/pipeone.pm blib\lib\DBI\Gofer\Transport\pipeone.pm
cp lib/DBI/DBD/SqlEngine/Developers.pod blib\lib\DBI\DBD\SqlEngine\Developers.pod
cp lib/DBI/W32ODBC.pm blib\lib\DBI\W32ODBC.pm
cp lib/DBD/Gofer/Transport/null.pm blib\lib\DBD\Gofer\Transport\null.pm
cp lib/Bundle/DBI.pm blib\lib\Bundle\DBI.pm
cp lib/DBD/File/Developers.pod blib\lib\DBD\File\Developers.pod
cp lib/DBI/Profile.pm blib\lib\DBI\Profile.pm
cp lib/DBI/ProfileDumper.pm blib\lib\DBI\ProfileDumper.pm
cp lib/DBI/Gofer/Serializer/Base.pm blib\lib\DBI\Gofer\Serializer\Base.pm
cp lib/DBI/ProxyServer.pm blib\lib\DBI\ProxyServer.pm
cp dbipport.h blib\arch\auto\DBI\dbipport.h
cp lib/DBI/Gofer/Execute.pm blib\lib\DBI\Gofer\Execute.pm
cp lib/DBI/DBD.pm blib\lib\DBI\DBD.pm
cp lib/Win32/DBIODBC.pm blib\lib\Win32\DBIODBC.pm
cp lib/DBI/DBD/SqlEngine.pm blib\lib\DBI\DBD\SqlEngine.pm
cp lib/DBD/ExampleP.pm blib\lib\DBD\ExampleP.pm
cp lib/DBI/PurePerl.pm blib\lib\DBI\PurePerl.pm
cp lib/DBI/ProfileData.pm blib\lib\DBI\ProfileData.pm
C:\Perl64\bin\perl.exe -p -e "s/~DRIVER~/Perl/g" Driver.xst > Perl.xsi
C:\Perl64\bin\perl.exe C:\cpanfly\var\megalib\ExtUtils\xsubpp -typemap C:\Perl64\lib\ExtUtils\typemap -typemap typemap Perl.xs > Perl.xsc && C:\Perl64\bin\perl.exe -MExtUtils::Command -e "mv" -- Perl.xsc Perl.c
cl -c -nologo -GF -W3 -MD -Zi -DNDEBUG -Ox -GL -Wp64 -fp:precise -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DWIN64 -DCONSERVATIVE -DUSE_SITECUSTOMIZE -DPRIVLIB_LAST_IN_INC -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX -MD -Zi -DNDEBUG -Ox -GL -Wp64 -fp:precise -DVERSION=\"1.615\" -DXS_VERSION=\"1.615\" "-IC:\Perl64\lib\CORE" Perl.c
Perl.c
c:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\Driver_xst.h(106) : warning C4244: 'function' : conversion from 'IV' to 'I32', possible loss of data
c:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\Driver_xst.h(110) : warning C4244: 'function' : conversion from '__int64' to 'I32', possible loss of data
Perl.xsi(67) : warning C4244: 'initializing' : conversion from '__int64' to 'int', possible loss of data
Perl.xsi(208) : warning C4244: 'initializing' : conversion from '__int64' to 'int', possible loss of data
Perl.xsi(640) : warning C4244: 'initializing' : conversion from '__int64' to 'int', possible loss of data
C:\Perl64\bin\perl.exe C:\cpanfly\var\megalib\ExtUtils\xsubpp -typemap C:\Perl64\lib\ExtUtils\typemap -typemap typemap DBI.xs > DBI.xsc && C:\Perl64\bin\perl.exe -MExtUtils::Command -e "mv" -- DBI.xsc DBI.c
cl -c -nologo -GF -W3 -MD -Zi -DNDEBUG -Ox -GL -Wp64 -fp:precise -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DWIN64 -DCONSERVATIVE -DUSE_SITECUSTOMIZE -DPRIVLIB_LAST_IN_INC -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX -MD -Zi -DNDEBUG -Ox -GL -Wp64 -fp:precise -DVERSION=\"1.615\" -DXS_VERSION=\"1.615\" "-IC:\Perl64\lib\CORE" DBI.c
DBI.c
DBI.xs(288) : warning C4018: '<' : signed/unsigned mismatch
DBI.xs(322) : warning C4018: '<' : signed/unsigned mismatch
DBI.xs(323) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(348) : warning C4018: '<' : signed/unsigned mismatch
DBI.xs(416) : warning C4244: '=' : conversion from 'IV' to 'I32', possible loss of data
DBI.xs(1030) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(1039) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(1042) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(1223) : warning C4311: 'type cast' : pointer truncation from 'SV *' to 'long'
DBI.xs(1381) : warning C4311: 'type cast' : pointer truncation from 'HV *' to 'long'
DBI.xs(1381) : warning C4311: 'type cast' : pointer truncation from 'imp_xxh_t *' to 'long'
DBI.xs(1496) : warning C4311: 'type cast' : pointer truncation from 'HV *' to 'unsigned long'
DBI.xs(1504) : warning C4311: 'type cast' : pointer truncation from 'HV *' to 'unsigned long'
DBI.xs(1511) : warning C4311: 'type cast' : pointer truncation from 'HV *' to 'unsigned long'
DBI.xs(1552) : warning C4311: 'type cast' : pointer truncation from 'HV *' to 'long'
DBI.xs(1552) : warning C4311: 'type cast' : pointer truncation from 'imp_xxh_t *' to 'long'
DBI.xs(1652) : warning C4244: 'initializing' : conversion from 'IV' to 'int', possible loss of data
DBI.xs(1894) : warning C4244: '=' : conversion from 'IV' to 'U32', possible loss of data
DBI.xs(2017) : warning C4244: 'initializing' : conversion from 'IV' to 'int', possible loss of data
DBI.xs(2026) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
DBI.xs(2062) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(2157) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(2246) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(2364) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(2384) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(2590) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(2595) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(2696) : warning C4244: '=' : conversion from '__int64' to 'I32', possible loss of data
DBI.xs(2790) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(2793) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(3067) : warning C4244: '=' : conversion from 'IV' to 'int', possible loss of data
DBI.xs(3093) : warning C4311: 'type cast' : pointer truncation from 'PerlInterpreter *' to 'unsigned long'
DBI.xs(3093) : warning C4311: 'type cast' : pointer truncation from 'PerlInterpreter *' to 'unsigned long'
DBI.xs(3247) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(3333) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(3397) : warning C4311: 'type cast' : pointer truncation from 'SV *' to 'long'
DBI.xs(3453) : warning C4244: '=' : conversion from '__int64' to 'int', possible loss of data
DBI.xs(3466) : warning C4244: '=' : conversion from '__int64' to 'I32', possible loss of data
DBI.xs(3496) : warning C4244: 'initializing' : conversion from 'IV' to 'const int', possible loss of data
DBI.xs(3532) : warning C4244: 'initializing' : conversion from 'IV' to 'int', possible loss of data
DBI.xs(4368) : warning C4244: '=' : conversion from 'IV' to 'U32', possible loss of data
DBI.xs(4435) : warning C4244: '=' : conversion from 'IV' to 'I32', possible loss of data
DBI.xs(4565) : warning C4244: 'function' : conversion from 'IV' to 'int', possible loss of data
DBI.xs(4567) : warning C4244: 'function' : conversion from 'IV' to 'int', possible loss of data
DBI.xs(4751) : warning C4244: '=' : conversion from '__int64' to 'I32', possible loss of data
DBI.xs(4821) : warning C4244: 'initializing' : conversion from '__int64' to 'int', possible loss of data
DBI.xs(4828) : warning C4244: '=' : conversion from '__int64' to 'int', possible loss of data
DBI.xs(4893) : warning C4244: '=' : conversion from '__int64' to 'int', possible loss of data
DBI.xs(4906) : warning C4311: 'type cast' : pointer truncation from 'AV *' to 'long'
DBI.xs(4906) : warning C4311: 'type cast' : pointer truncation from 'AV *' to 'long'
DBI.xs(4938) : warning C4267: 'function' : conversion from 'size_t' to 'I32', possible loss of data
DBI.xs(4951) : warning C4244: 'initializing' : conversion from '__int64' to 'const int', possible loss of data
Running Mkbootstrap for DBI ()
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644 DBI.bs
C:\Perl64\bin\perl.exe -MExtUtils::Mksymlists -e "Mksymlists('NAME'=>\"DBI\", 'DLBASE' => 'DBI', 'DL_FUNCS' => { }, 'FUNCLIST' => [], 'IMPORTS' => { }, 'DL_VARS' => []);"
link -out:blib\arch\auto\DBI\DBI.dll -dll -nologo -nodefaultlib -debug -opt:ref,icf -ltcg -libpath:"C:\Perl64\lib\CORE" -machine:AMD64 DBI.obj C:\Perl64\lib\CORE\perl510.lib oldnames.lib kernel32.lib user32.lib gdi32.lib winspool.lib comdlg32.lib advapi32.lib shell32.lib ole32.lib oleaut32.lib netapi32.lib uuid.lib ws2_32.lib mpr.lib winmm.lib version.lib odbc32.lib odbccp32.lib bufferoverflowU.lib msvcrt.lib -def:DBI.def
Creating library blib\arch\auto\DBI\DBI.lib and object blib\arch\auto\DBI\DBI.exp
Generating code
Finished generating code
if exist blib\arch\auto\DBI\DBI.dll.manifest mt -nologo -manifest blib\arch\auto\DBI\DBI.dll.manifest -outputresource:blib\arch\auto\DBI\DBI.dll;2
if exist blib\arch\auto\DBI\DBI.dll.manifest del blib\arch\auto\DBI\DBI.dll.manifest
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "chmod" -- 755 blib\arch\auto\DBI\DBI.dll
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "cp" -- DBI.bs blib\arch\auto\DBI\DBI.bs
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644 blib\arch\auto\DBI\DBI.bs
C:\Perl64\bin\perl.exe "-Iblib\arch" "-Iblib\lib" dbiprof.PL dbiprof
Extracted dbiprof from dbiprof.PL with variable substitutions.
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "cp" -- dbiprof blib\script\dbiprof
pl2bat.bat blib\script\dbiprof
C:\Perl64\bin\perl.exe "-Iblib\arch" "-Iblib\lib" dbiproxy.PL dbiproxy
Extracted dbiproxy from dbiproxy.PL with variable substitutions.
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "cp" -- dbiproxy blib\script\dbiproxy
pl2bat.bat blib\script\dbiproxy
C:\Perl64\bin\perl.exe "-Iblib\arch" "-Iblib\lib" dbilogstrip.PL dbilogstrip
Extracted dbilogstrip from dbilogstrip.PL with variable substitutions.
C:\Perl64\bin\perl.exe -MExtUtils::Command -e "cp" -- dbilogstrip blib\script\dbilogstrip
pl2bat.bat blib\script\dbilogstrip
TIMB/DBI-1.615.tar.gz
nmake -- OK
Prepending C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/arch C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/lib to PERL5LIB for 'test'
Running make test
>>> nmake test TEST_VERBOSE=1
Microsoft (R) Program Maintenance Utility Version 7.00.8882
Copyright (C) Microsoft Corp 1988-2000. All rights reserved.
C:\Perl64\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(1, 'blib\lib', 'blib\arch')" t/*.t
t/01basics.t ...............
1..130
ok 1 - use DBI;
ok 2 - ... testing sql_type
ok 3 - ... testing sql_type
ok 4 - ... testing sql_type
ok 5 - ... testing sql_type
ok 6 - ... testing sql_type
ok 7 - ... testing sql_type
ok 8 - ... testing sql_type
ok 9 - ... testing sql_type
ok 10 - ... testing sql_type
ok 11 - ... testing sql_type
ok 12 - ... testing sql_type
ok 13 - ... testing sql_type
ok 14 - ... testing sql_type
ok 15 - ... testing sql_type
ok 16 - ... testing sql_type
ok 17 - ... testing sql_type
ok 18 - ... testing sql_type
ok 19 - ... testing sql_type
ok 20 - ... testing sql_type
ok 21 - ... testing sql_type
ok 22 - ... testing sql_type
ok 23 - ... testing sql_type
ok 24 - ... testing sql_type
ok 25 - ... testing sql_type
ok 26 - ... testing sql_type
ok 27 - ... testing sql_type
ok 28 - ... testing sql_type
ok 29 - ... testing sql_type
ok 30 - ... testing sql_type
ok 31 - ... testing sql_type
ok 32 - ... testing sql_type
ok 33 - ... testing sql_type
ok 34 - ... testing sql_type
ok 35 - ... testing sql_type
ok 36 - ... testing sql_type
ok 37 - ... testing sql_type
ok 38 - ... testing sql_type
ok 39 - ... testing sql_type
ok 40 - ... testing sql_type
ok 41 - ... testing sql_type
ok 42 - ... testing sql_type
ok 43 - ... testing sql_type
ok 44 - ... testing sql_type
ok 45 - ... testing sql_type
ok 46 - ... testing sql_type
ok 47 - ... testing sql_type
ok 48 - ... testing sql_type
ok 49 - ... testing sql_type
ok 50 - ... testing sql_type
ok 51 - ... testing sql_type
ok 52 - ... testing sql_type
ok 53 - ... testing sql_type
ok 54 - ... testing sql_type
ok 55 - ... testing sql_type
ok 56 - ... testing sql_type
ok 57 - ... testing sql_type
ok 58 - ... testing sql_type
ok 59 - ... testing sql_type
ok 60 - ... testing sql_cursor_types
ok 61 - ... testing sql_cursor_types
ok 62 - ... testing sql_cursor_types
ok 63 - ... testing sql_cursor_types
ok 64 - ... testing sql_cursor_types
ok 65 - ... looks_like_number : undef -> undef
ok 66 - ... looks_like_number : "" -> undef (eg "don't know")
ok 67 - ... looks_like_number : "foo" -> defined false
ok 68 - ... looks_like_number : "foo" -> defined false
ok 69 - ... looks_like_number : 1 -> true
ok 70 - ... looks_like_number : "." -> false
ok 71 - ... looks_like_number : 1 -> true
ok 72 - ... looks_like_number : 1 -> true
ok 73 - ... 1000 initial state is 400
ok 74 - ... neat : 1 + 1 -> "2"
ok 75 - ... neat : 2 -> "'2'"
ok 76 - ... neat : undef -> "undef"
ok 77 - ... test array argument w/seperator and maxlen
ok 78 - ... test array argument w/out seperator or maxlen
ok 79 - The object isa DBI::dr
ok 80 - ... test debug
ok 81 - ... test DebugDispatch
ok 82 - ... test Warn
ok 83 - ... this should say Tim Bunce
ok 84 - ... the version should match DBI version
ok 85 - ... this should work and return 1
ok 86 - ... this should equal 1
ok 87 - ... CachedKids should be undef initially
ok 88 - ... CachedKids should be our ref
ok 89 - ... this should be zero
ok 90 - ... this should be zero
ok 91 - ... Active flag is true
ok 92 - ... we should get a warning here
ok 93 - ... we should get a warning here
ok 94 - ... we should get no warnings here
ok 95 - ... we at least have one driver installed
ok 96 - ... we should at least have ExampleP installed
ok 97 - ... we should at least have one driver
ok 98 - ... should be -1077531989
ok 99 - ... should be -1077531989
ok 100 - ... should be -1077531990
ok 101
ok 102
ok 103
ok 104
ok 105
ok 106
ok 107
ok 108
ok 109
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116
ok 117
ok 118
ok 119
ok 120
ok 121
ok 122
ok 123
ok 124 # skip developer tests
ok 125 # skip developer tests
ok 126 # skip developer tests
ok 127 # skip developer tests
ok 128 - ... DBI::dbi_debug's initial state is 0
ok 129 - ... DBI::dbi_debug is 15
ok 130 - ... DBI::dbi_debug is 0
ok
t/02dbidrv.t ...............
1..53
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - ... DBD::Test->driver called to getnew Driver handle
ok 5 - ... new Driver handle (DBI::dr=HASH(0x2f1b460)) created successfully
ok 6 - The object isa DBI::dr
ok 7 - ... got a Test Driver object back from DBI->install_driver
ok 8 - The object isa DBI::dr
ok 9 - ... checking the DBI::_get_imp_data function
ok 10 - ... Driver object passed to data_sources
ok 11 - The object isa DBI::dr
ok 12 - ... Driver object is not tied
ok 13 - ... got correct datasources from DBI->data_sources("Test")
ok 14 - ... this Driver does not yet have any Kids
ok 15 - ... got a database handle from calling $drh->connect
ok 16 - The object isa DBI::db
ok 17 - ... this Driver does not yet have any Kids
ok 18 - ... Driver object passed to data_sources
ok 19 - The object isa DBI::dr
ok 20 - ... Driver object is not tied
ok 21 - ... checking fetched datasources from Driver
ok 22 - ... got correct datasources from $dbh->data_sources()
ok 23 - ... Database object passed to do
ok 24 - The object isa DBI::db
ok 25 - ... Database object is not tied
ok 26 - ... got Driver object from Database object with Driver attribute
ok 27 - The object isa DBI::dr
ok 28 - ... Driver object is not tied
ok 29 - ... got Driver object from Database object by FETCH-ing Driver attribute
ok 30 - The object isa DBI::dr
ok 31 - ... Driver object is not tied
ok 32 - ... this will trigger more driver internal tests above in DBD::Test::db
ok 33 - ... checking Driver handle err set with set_err method
ok 34 - ... checking Database handle err set with set_err method
ok 35 - ... checking Database handle err set with Driver handle set_err method
ok 36 - ... this Driver does not yet have any Kids
ok 37 - ... $dbh->DESTROY should set $drh->err to 42
ok 38 - ... checking $DBI::err set with Driver handle set_err method
ok 39 - ... checking $DBI::errstr
ok 40 - ... checking $DBI::state
ok 41 - ... checking $DBI::state
ok 42 - ... checking $DBI::state
ok 43 - ... trying to assign to $DBI::rows should throw an excpetion
ok 44 - ... FetchHashKeyName is NAME
ok 45 - ... FetchHashKeyName is now changed to NAME_lc
ok 46 - ... calling $drh->disconnect_all (not implemented but will fail silently)
ok 47 - has dbixs_revision
ok 48 - has integer dbixs_revision
ok 49 - ... $drh can FETCH
ok 50 - ... and it returned a proper CODE ref
ok 51 - ... used FETCH returned from can to fetch the Name attribute
ok 52 - ... the Name attribute is equal to Test
ok 53 - ...
ok
t/03handle.t ...............
1..137
ok 1 - use DBI;
ok 2
ok 3 - The object isa DBI::dr
ok 4 - ... this Driver does not yet have any Kids
ok 5
ok 6
ok 7
ok 8 - The object isa DBI::db
ok 9 - ... our Driver has one Kid
ok 10 - ... our Driver has one ActiveKid
ok 11 - The object isa DBI::st
ok 12 - ... execute ran successfully
ok 13 - ... we got the CachedKids hash
ok 14 - ... there is one CachedKid
ok 15 - ... our statment handle should be in the CachedKids
ok 16 - ... our first statment is Active
ok 17 - The object isa DBI::st
ok 18 - ... prepare_cached returned the same statement handle
ok 19 - ... we got warned about our first statement handle being still active
ok 20 - ... our first statment is no longer Active since we re-prepared it
ok 21 - The object isa DBI::st
ok 22 - ... prepare_cached returned a different statement handle now
ok 23 - ... there are two CachedKids
ok 24 - ... both statment handles should be in the CachedKids
ok 25 - ... executing first statement handle again
ok 26 - ... first statement handle is now active again
ok 27 - The object isa DBI::st
ok 28 - ... our fourth statement handle is not the same as our first
ok 29 - ... first statement handle is still active
ok 30 - ... there are two CachedKids
ok 31 - ... second and fourth statment handles should be in the CachedKids
ok 32 - ... first statement handle is no longer active
ok 33 - ... fourth statement handle executed properly
ok 34 - ... fourth statement handle is Active
ok 35 - The object isa DBI::st
ok 36 - ... we still only got one warning
ok 37 - ... fourth statement handle and fifth one match
ok 38 - ... fourth statement handle is not Active
ok 39 - ... fifth statement handle is not Active (shouldnt be its the same as fifth)
ok 40 - ... there are two CachedKids
ok 41 - ... second and fourth/fifth statment handles should be in the CachedKids
ok 42 - ... sixth statement handle is active
ok 43 - ... first statement handle is not active
ok 44 - ... first statement handle becomes the sixth
ok 45 - ... sixth statement handle is now not active
ok 46 - ... first statement handle is now active again
ok 47 - ... first statement handle becomes the sixth
ok 48 - ... sixth statement handle is active
ok 49 - ... first statement handle is not active
ok 50 - ... first statement handle becomes the sixth
ok 51 - ... sixth statement handle is now not active
ok 52 - ... first statement handle is now active again
ok 53 - ... can not swap a sth with a dbh
ok 54
ok 55 - ... first statement handle becomes the sixth
ok 56 - ... sixth statement handle is active
ok 57 - ... first statement handle is not active
ok 58
ok 59
ok 60 - ... can't swap_inner_handle with handle from different parent
ok 61
ok 62
ok 63 - ... can swap to different parent if forced
ok 64
ok 65 - ping should be true before disconnect
ok 66 - ping should be false after disconnect
ok 67 - ... our Driver has one Kid after disconnect
ok 68 - ... our Driver has no ActiveKids after disconnect
ok 69 - ... our ExampleP driver should have 0 Kids after dbh was destoryed
ok 70 - The object isa DBI::db
ok 71 - ... the Driver should have 1 Kid(s) now
ok 72 - not testing Driver here
ok 73 - The object isa DBI::st
ok 74 - not testing Database here
ok 75 - ... the Driver should have no Kids
ok 76 - The object isa DBI::db
ok 77 - ... the Driver should have 1 Kid(s) now
ok 78 - The object isa DBI::dr
ok 79 - The object isa DBI::st
ok 80 - not testing Database here
ok 81 - ... the Driver should have no Kids
ok 82 - The object isa DBI::db
ok 83 - ... the Driver should have 1 Kid(s) now
ok 84 - not testing Driver here
ok 85 - The object isa DBI::st
ok 86 - The object isa DBI::db
ok 87 - ... the Driver should have no Kids
ok 88 - The object isa DBI::db
ok 89 - ... the Driver should have 1 Kid(s) now
ok 90 - The object isa DBI::dr
ok 91 - The object isa DBI::st
ok 92 - The object isa DBI::db
ok 93 - ... the Driver should have no Kids
ok 94 - ... the Driver should have no Kids at the end of this test
ok 95 - The object isa DBI::db
ok 96 - ... our Driver should have 1 Kid(s) here
ok 97
ok 98
ok 99 - we need weakrefs for take_imp_data to work safely with child handles
ok 100 - should have 3 entries (implementation detail)
ok 101 - should have 2 defined handles
ok 102 - ... we got some imp_data to test
ok 103 - ... test that our imp_data is greater than or equal to 80, this is reasonable
ok 104 - ... our Driver should have 0 Kid(s) after calling take_imp_data
ok 105 - sth should be reblessed
ok 106
warn: Can't call FETCH method on handle DBI::db=HASH(0x3027788) after take_imp_data() at t/03handle.t line 316.
ok 107 - ... our Driver should be undefined
warn: Can't call FETCH method on handle DBI::db=HASH(0x3027788) after take_imp_data() at t/03handle.t line 319.
ok 108 - ... our TraceLevel should be undefined
warn: Can't call disconnect method on handle DBI::db=HASH(0x3027788) after take_imp_data() at t/03handle.t line 322.
ok 109 - ... disconnect should return undef
warn: Can't call quote method on handle DBI::db=HASH(0x3027788) after take_imp_data() at t/03handle.t line 324.
ok 110 - ... quote should return undefined
ok 111 - ... we should have gotten 4 warnings
ok 112 - The object isa DBI::db
ok 113 - ... our Driver should have 1 Kid(s) again
ok 114 - ... our Driver has no Kids after this test
ok 115 - The object isa DBI::dr
ok 116 - ... our Driver (2) has no Kids before this test
ok 117 - The object isa DBI::db
ok 118 - The object isa DBI::st
ok 119 - ... NUM_OF_PARAMS is 0
ok 120 - ... NUM_OF_FIELDS should be undef
ok 121 - ... Statement is "foo bar"
ok 122 - ... NAME is undefined
ok 123 - ... TYPE is undefined
ok 124 - ... SCALE is undefined
ok 125 - ... PRECISION is undefined
ok 126 - ... NULLABLE is undefined
ok 127 - ... RowsInCache is undefined
ok 128 - ... ParamValues is undefined
ok 129 - ... NAME_uc is undefined
ok 130 - ... NAME_lc is undefined
ok 131 - ... NAME_hash is undefined
ok 132 - ... NAME_uc_hash is undefined
ok 133 - ... NAME_lc_hash is undefined
ok 134 - ... $dbh can call "prepare"
ok 135 - ... $dbh cannot call "nonesuch"
ok 136 - ... $sth can call "execute"
ok 137 - ... our Driver (2) has no Kids after this test
ok
t/04mods.t .................
1..12
ok 1 - use DBI;
ok 2 - use DBI::Const::GetInfo::ANSI;
ok 3 - use DBI::Const::GetInfo::ODBC;
ok 4 - use DBI::Const::GetInfoType;
ok 5 - use DBI::Const::GetInfoReturn;
ok 6 - ... we have at least one key in the GetInfoType hash
ok 7 - ... the GetInfoType hash is constructed from the ANSI and ODBC hashes
ok 8 - ... we have at least one key in the GetInfoReturnType hash
ok 9 - ... the GetInfoReturnType hash is constructed from the ANSI and ODBC hashes
ok 10 - ... we have at least one key in the GetInfoReturnValues hash
ok 11 - DBI::Const::GetInfoReturn->can('Format')
ok 12 - DBI::Const::GetInfoReturn->can('Explain')
ok
t/05concathash.t ...........
1..41
ok 1 - use DBI;
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9 - should work with nul bytes in kv_sep and pair_sep
ok 10 - should work with nul bytes in hash value (neat)
ok 11 - should work with nul bytes in hash value (not neat)
ok 12
ok 13
ok 14
ok 15 - test
ok 16 - test
ok 17 - Unknown sort order
ok 18 - Float Hash - Not Neat lexical
ok 19 - Numeric - Not Neat lexical
ok 20 - Mixed Hash - Not Neat lexical
ok 21 - Simple Hash - Not Neat lexical
ok 22 - Float Hash - Neat lexical
ok 23 - Numeric - Neat lexical
ok 24 - Mixed Hash - Neat lexical
ok 25 - Simple Hash - Neat lexical
ok 26 - Float Hash - Not Neat guess
ok 27 - Numeric - Not Neat guess
ok 28 - Mixed Hash - Not Neat guess
ok 29 - Simple Hash - Not Neat guess
ok 30 - Float Hash - Neat guess
ok 31 - Numeric - Neat guess
ok 32 - Mixed Hash - Neat guess
ok 33 - Simple Hash - Neat guess
ok 34 - Float Hash - Not Neat numeric
ok 35 - Numeric - Not Neat numeric
ok 36 - Mixed Hash - Not Neat numeric
ok 37 - Simple Hash - Not Neat numeric
ok 38 - Float Hash - Neat numeric
ok 39 - Numeric - Neat numeric
ok 40 - Mixed Hash - Neat numeric
ok 41 - Simple Hash - Neat numeric
ok
t/06attrs.t ................
1..148
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking Warn attribute for dbh
ok 4 - ... checking Active attribute for dbh
ok 5 - ... checking AutoCommit attribute for dbh
ok 6 - ... checking CompatMode attribute for dbh
ok 7 - ... checking InactiveDestory attribute for dbh
ok 8 - ... checking AutoInactiveDestory attribute for dbh
ok 9 - ... checking PrintError attribute for dbh
ok 10 - ... checking PrintWarn attribute for dbh
ok 11 - ... checking RaiseError attribute for dbh
ok 12 - ... checking ShowErrorStatement attribute for dbh
ok 13 - ... checking ChopBlanks attribute for dbh
ok 14 - ... checking LongTrunkOk attribute for dbh
ok 15 - ... checking TaintIn attribute for dbh
ok 16 - ... checking TaintOut attribute for dbh
ok 17 - ... checking Taint attribute for dbh
ok 18 - ... checking Executed attribute for dbh
ok 19 - ... checking ErrCount attribute for dbh
ok 20 - ... checking Kids attribute for dbh
ok 21 - ... checking ActiveKids attribute for dbh
ok 22 - ... checking CachedKids attribute for dbh
ok 23 - ... checking HandleError attribute for dbh
ok 24 - ... checking Profile attribute for dbh
ok 25 - ... checking Statement attribute for dbh
ok 26 - ... checking RowCacheSize attribute for dbh
ok 27 - ... checking ReadOnly attribute for dbh
ok 28 - ... checking FetchHashKeyName attribute for dbh
ok 29 - ... checking Name attribute for dbh
ok 30 - ... checking TraceLevel attribute for dbh
ok 31 - ... checking LongReadLen attribute for dbh
ok 32 - should be able to FETCH_many
ok 33 - should see driver-private dbh attribute value
ok 34 - ... catching exception
ok 35 - ... $dbh->err is undefined
ok 36 - ... checking $dbh->errstr
ok 37 - ... checking $dbh->state
ok 38 - ... checking Executed attribute for dbh
ok 39 - ... checking Executed attribute for dbh (after reset)
ok 40 - ... checking ErrCount attribute for dbh (after error was generated)
ok 41 - The object isa DBI::dr
ok 42 - ... checking $dbh->err
ok 43 - ... checking ErrCount attribute for drh
ok 44 - ... checking Warn attribute for drh
ok 45 - ... checking Active attribute for drh
ok 46 - ... checking AutoCommit attribute for drh
ok 47 - ... checking CompatMode attribute for drh
ok 48 - ... checking InactiveDestory attribute for drh
ok 49 - ... checking AutoInactiveDestory attribute for drh
ok 50 - ... checking PrintError attribute for drh
ok 51 - ... checking PrintWarn attribute for drh
ok 52 - ... checking RaiseError attribute for drh
ok 53 - ... checking ShowErrorStatement attribute for drh
ok 54 - ... checking ChopBlanks attribute for drh
ok 55 - ... checking LongTrunkOk attribute for drh
ok 56 - ... checking TaintIn attribute for drh
ok 57 - ... checking TaintOut attribute for drh
ok 58 - ... checking Taint attribute for drh
ok 59 - ... checking Executed attribute for drh
ok 60 - ... checking Kids attribute for drh
ok 61 - ... checking ActiveKids attribute for drh
ok 62 - ... checking CachedKids attribute for drh
ok 63 - ... checking HandleError attribute for drh
ok 64 - ... checking Profile attribute for drh
ok 65 - ... checking ReadOnly attribute for drh
ok 66 - ... checking TraceLevel attribute for drh
ok 67 - ... checking LongReadLen attribute for drh
ok 68 - ... checking FetchHashKeyName attribute for drh
ok 69 - ... checking Name attribute for drh
ok 70 - The object isa DBI::st
ok 71 - ... checking Executed attribute for sth
ok 72 - ... checking Executed attribute for dbh
ok 73 - ... checking ErrCount attribute for sth
ok 74 - ... checking exception
ok 75 - ... checking $sth->errstr
ok 76 - ... checking $sth->state
ok 77 - ... checking Executed attribute for sth
ok 78 - ... checking Exceuted attribute for dbh
ok 79 - ... checking ErrCount attribute for sth
ok 80 - ... checking exception
ok 81 - ... checking ErrCount attribute for sth (after assignment)
ok 82 - ... checking ErrCount attribute for sth (after reset)
ok 83 - ... checking Warn attribute for sth
ok 84 - ... checking Active attribute for sth
ok 85 - ... checking CompatMode attribute for sth
ok 86 - ... checking InactiveDestroy attribute for sth
ok 87 - ... checking AutoInactiveDestroy attribute for sth
ok 88 - ... checking PrintError attribute for sth
ok 89 - ... checking PrintWarn attribute for sth
ok 90 - ... checking RaiseError attribute for sth
ok 91 - ... checking ShowErrorStatement attribute for sth
ok 92 - ... checking ChopBlanks attribute for sth
ok 93 - ... checking LongTrunkOk attribute for sth
ok 94 - ... checking TaintIn attribute for sth
ok 95 - ... checking TaintOut attribute for sth
ok 96 - ... checking Taint attribute for sth
ok 97 - ... checking Kids attribute for sth
ok 98 - ... checking ActiveKids attribute for sth
ok 99 - ... checking CachedKids attribute for sth
ok 100 - ... checking HandleError attribute for sth
ok 101 - ... checking Profile attribute for sth
ok 102 - ... checking ReadOnly attribute for sth
ok 103 - ... checking TraceLevel attribute for sth
ok 104 - ... checking LongReadLen attribute for sth
ok 105 - ... checking FetchHashKeyName attribute for sth
ok 106 - ... checking CursorName attribute for sth
ok 107 - ... checking NUM_OF_FIELDS attribute for sth
ok 108 - ... checking NUM_OF_PARAMS attribute for sth
ok 109 - ... checking type of NAME attribute for sth
ok 110 - ... checking number of elements returned
ok 111 - ... checking values returned
ok 112 - ... checking type of NAME_lc attribute for sth
ok 113 - ... checking number of elements returned
ok 114 - ... checking values returned
ok 115 - ... checking type of NAME_uc attribute for sth
ok 116 - ... checking number of elements returned
ok 117 - ... checking values returned
ok 118 - ... checking type of NAME_hash attribute for sth
ok 119 - ... checking number of keys returned
ok 120 - ... checking values returned
ok 121 - ... checking values returned
ok 122 - ... checking type of NAME_lc_hash attribute for sth
ok 123 - ... checking number of keys returned
ok 124 - ... checking values returned
ok 125 - ... checking values returned
ok 126 - ... checking type of NAME_uc_hash attribute for sth
ok 127 - ... checking number of keys returned
ok 128 - ... checking values returned
ok 129 - ... checking values returned
ok 130 - ... checking type of TYPE attribute for sth
ok 131 - ... checking number of elements returned
ok 132 - ... checking values returned
ok 133 - ... checking type of NULLABLE attribute for sth
ok 134 - ... checking number of elements returned
ok 135 - ... checking values returned
ok 136 - ... checking type of PRECISION attribute for sth
ok 137 - ... checking number of elements returned
ok 138 - ... checking values returned
ok 139 - ... checking type of SCALE attribute for sth
ok 140 - ... checking number of elements returned
ok 141 - ... checking values returned
ok 142 - ... checking type of ParamValues attribute for sth
ok 143 - ... checking values returned
ok 144 - ... checking Statement attribute for sth
ok 145 - ... checking type of RowsInCache attribute for sth
ok 146 - should see driver-private sth attribute value
# Checking inheritance
ok 147 - dbh ReadOnly value should be inherited from drh
ok 148 - sth ReadOnly value should be inherited from dbh
ok
t/07kids.t .................
1..20
ok 1 - The object isa DBI::db
ok 2 - ... database handle has 0 Kid(s) at start
ok 3 - ... database handle has 0 ActiveKid(s) at start
ok 4 - The object isa DBI::st
ok 5 - ... database handle has 1 Kid(s) after $dbh->prepare
ok 6 - ... database handle has 0 ActiveKid(s) after $dbh->prepare
ok 7 - ... database handle has 1 Kid(s) after $sth->execute
ok 8 - ... database handle has 1 ActiveKid(s) after $sth->execute
ok 9 - ... database handle has 1 Kid(s) after $sth->finish
ok 10 - ... database handle has 0 ActiveKid(s) after $sth->finish
ok 11 - ... database handle has 0 Kid(s) after $sth is destroyed
ok 12 - ... database handle has 0 ActiveKid(s) after $sth is destroyed
ok 13 - The object isa DBI::dr
ok 14 - ... driver handle has 1 Kid(s)
ok 15 - ... driver handle has 1 ActiveKid(s)
ok 16 - ... driver handle has 1 Kid(s) after $dbh->disconnect
ok 17 - ... driver handle has 0 ActiveKid(s) after $dbh->disconnect
ok 18 - ... lets be sure that $dbh is not undefined
ok 19 - ... driver handle has 0 Kid(s) after undef $dbh
ok 20 - ... driver handle has 0 ActiveKid(s) after undef $dbh
ok
t/08keeperr.t ..............
1..69
ok 1 - use DBI;
ok 2 - ... checking error
ok 3 - ... checking error
Test HandleSetErr
ok 4 - The object isa DBI::db
ok 5 - ... $DBI::err is not defined
HandleSetErr called: h=DBI::db=HASH(0x2d71078), err=, errstr=(got info), state=
ok 6 - ... $DBI::err is defined
ok 7 - ... $DBI::err is an empty string
ok 8 - ... $DBI::errstr is as we expected
ok 9 - ... $dbh->errstr matches $DBI::errstr
ok 10 - ... $warn{failed} is 0
ok 11 - ... $warn{warning} is 0
ok 12 - ... the @handlewarn array is (1, 0, 0)
HandleSetErr called: h=DBI::db=HASH(0x2d71078), err=0, errstr=(got warn), state=AA001
warn: 'DBD::ExampleP::db set_err warning: (got info)\n(got warn) at t/08keeperr.t line 131.\n'
ok 13 - ... $DBI::err is defined
ok 14 - ... $DBI::err is "0"
ok 15 - ... $DBI::errstr is as we expected
ok 16 - ... $dbh->errstr matches $DBI::errstr
ok 17 - ... $DBI::state is AA001
ok 18 - ... $warn{warning} is 1
ok 19 - ... the @handlewarn array is (1, 1, 0)
HandleSetErr called: h=DBI::db=HASH(0x2d71078), err=, errstr=(got more info), state=
warn: 'DBD::ExampleP::db set_err warning: (got info)\n(got warn)\n(got more info) at t/08keeperr.t line 146.\n'
ok 20 - ... $DBI::err is defined
ok 21 - ... $DBI::err is "0"
ok 22 - ... $dbh->err is "0"
ok 23 - ... $DBI::state is AA001
ok 24 - ... $DBI::errstr is as we expected
ok 25 - ... $dbh->errstr matches $DBI::errstr
ok 26 - ... $warn{warning} is 2
ok 27 - ... the @handlewarn array is (2, 1, 0)
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error) at t/08keeperr.t line 167.\n'
ok 28 - ... $DBI::err is defined
ok 29 - ... $DBI::err is 42
ok 30 - ... $warn{warning} is 2
ok 31 - ... $dbh->errstr is as we expected
ok 32 - ... $DBI::state is AA002
ok 33 - ... the @handlewarn array is (2, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x2d71078), err=, errstr=(got info), state=
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info) at t/08keeperr.t line 179.\n'
ok 34 - ... $DBI::err is defined
ok 35 - ... $DBI::err is 42
ok 36 - ... $warn{warning} is 2
ok 37 - ... $dbh->errstr is as we expected
ok 38 - ... the @handlewarn array is (3, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x2d71078), err=0, errstr=(got warn), state=
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) at t/08keeperr.t line 190.\n'
ok 39 - ... $DBI::err is defined
ok 40 - ... $DBI::err is 42
ok 41 - ... $warn{warning} is 2
ok 42 - ... $dbh->errstr is as we expected
ok 43 - ... the @handlewarn array is (3, 2, 1)
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) [err was 42 now 4200] [state was AA002 now AA003]\n(got new error) at t/08keeperr.t line 201.\n'
ok 44 - ... $DBI::err is defined
ok 45 - ... $DBI::err is 4200
ok 46 - ... $warn{warning} is 2
ok 47 - ... $dbh->errstr is as we expected
ok 48 - ... the @handlewarn array is (3, 2, 2)
ok 49 - ... $dbh->errstr is defined
ok 50 - ... $dbh->err is defined
ok 51 - ... $dbh->state is an empty string
warn: 'DBD::ExampleP::db set_err failed: foo at t/08keeperr.t line 226.\n'
ok 52 - ... only returned one value
ok 53 - ... the first value is undefined
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar at t/08keeperr.t line 230.\n'
ok 54 - ... $dbh->set_err returned undefiend
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz at t/08keeperr.t line 231.\n'
ok 55 - ... $dbh->set_err returned undefiend
HandleSetErr called: h=DBI::db=HASH(0x2d71078), err=0, errstr=warn, state=
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz\nwarn at t/08keeperr.t line 232.\n'
ok 56 - ... $dbh->set_err returned undefiend
ok 57 - ... $dbh->errstr is as we expected
ok 58 - ... $warn{failed} is 4
ok 59 - ... the @handlewarn array is (0, 1, 3)
warn: 'DBD::ExampleP::db method failed: foo at t/08keeperr.t line 242.\n'
ok 60 - ... only returned one value
ok 61 - ... the first value is undefined
warn: 'DBD::ExampleP::db method failed: foo at t/08keeperr.t line 246.\n'
ok 62 - ... only returned one value
ok 63 - ... the first value is "42"
warn: 'DBD::ExampleP::db method failed: foo at t/08keeperr.t line 250.\n'
ok 64 - ... returned no values
HandleSetErr called: h=DBI::db=HASH(0x2d71078), err=, errstr=info, state=override
warn: 'DBD::ExampleP::db set_err failed: errstr99 at t/08keeperr.t line 257.\n'
ok 65 - ... only returned one value
ok 66 - ... the first value is undefined
ok 67 - ... $dbh->err is 99
ok 68 - ... $dbh->errstr is as we expected
ok 69 - ... $dbh->state is as we expected
ok
t/09trace.t ................
1..67
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - trace file size = 3100
ok 4 - ... checking TraceLevel attribute
ok 5 - ... trace file successfully created
parse_trace_flag SQL
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
parse_trace_flag foo
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
parse_trace_flag bar
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
parse_trace_flag baz
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
parse_trace_flag boo
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
parse_trace_flag bop
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53
parse_trace_flag SQL foo bar baz boo bop
ok 54 - ...
ok 55 - ...
inherit
ok 56 - The object isa DBI::st
ok 57
ok 58
ok 59
test unknown parse_trace_flag
ok 60
ok 61
caught warn: DBI::db=HASH(0x2f981f0)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at t/09trace.t line 119
ok 62
ok 63
caught warn: DBI::db=HASH(0x2f981f0)->parse_trace_flags(nonesuch|SQL|nonesuch2) ignored unknown trace flags: 'nonesuch' 'nonesuch2' at t/09trace.t line 121
ok 64
ok 65
ok 66
ok 67
ok
t/10examp.t ................
1..210
ok 1 - connect should fail
ok 2 - ... we should have an exception here
ok 3 - ... $dbh2 should not be defined
ok 4
ok 5
ok 6 - ... these 2 handles are cached, so they are the same
ok 7
ok 8 - ... this handle was created with different parameters, so it is not the same
ok 9
ok 10 - Executed should be true
ok 11
ok 12 - should return same handle
ok 13 - Executed should be false because reset by connect attributes
ok 14 - The object isa DBI::dr
ok 15 - ... these are our cached kids
ok 16 - ... we have emptied out cache
ok 17
ok 18 - ... PrintError should be 0
ok 19 - ... FetchHashKey is NAME
ok 20 - ... checking the example driver_path
others
ok 21 - DBI commit: invalid number of arguments: got handle + 1, expected handle + between 0 and 0
# Usage: $h->commit() at t/10examp.t line 88.
#
ok 22 - ping should return true
ok 23 - prepare should fail
ok 24 - sth->err should be true
ok 25 - DBI::err should be true
ok 26 - $DBI::err should match $dbh->err
ok 27 - $DBI::errstr should contain error string
ok 28 - $DBI::errstr should match $dbh->errstr
ok 29
ok 30
ok 31
ok 32
ok 33 - DBI::db=HASH(0x313e180) ne DBI::db=HASH(0x313e180)
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53 - errstr should contain error message
ok 54
ok 55 - errstr should contain error message
ok 56
ok 57
ok 58 - errstr should contain error message
ok 59
ok 60 - errstr should contain error message
ok 61
ok 62
ok 63
ok 64
ok 65
ok 66
ok 67
ok 68
fetchrow_hashref('NAME_uc')
ok 69
ok 70
ok 71
ok 72
ok 73
fetchrow_hashref('ParamValues')
ok 74
ok 75
FetchHashKeyName
ok 76
ok 77
ok 78
ok 79
ok 80
ok 81
fetchall_arrayref
ok 82
ok 83
ok 84
ok 85
ok 86
ok 87
fetchall_arrayref array slice
ok 88
ok 89
ok 90
ok 91
fetchall_arrayref hash slice
ok 92
ok 93
ok 94
ok 95
fetchall_arrayref hash
ok 96
ok 97
ok 98
ok 99 - '16895 0 .' ne '16895 0 .'
rows()
ok 100 - row count 3
ok 101 - 3 vs 3
ok 102 - 3 vs 3
fetchall_arrayref array slice and max rows
ok 103
ok 104
ok 105
selectrow_array
ok 106
ok 107
selectrow_hashref
ok 108
ok 109
ok 110
ok 111
selectall_arrayref
ok 112
ok 113
ok 114
ok 115
selectall_arrayref Slice array slice
ok 116
ok 117
ok 118 - ". 16895" eq ". 16895"
ok 119
selectall_arrayref Columns array slice
ok 120
ok 121
ok 122 - ". 16895" eq ". 16895"
ok 123
selectall_arrayref hash slice
ok 124
ok 125
ok 126
ok 127
ok 128
ok 129
ok 130
selectall_hashref
ok 131 - selectall_hashref result
ok 132 - selectall_hashref HASH: HASH
ok 133
ok 134 - 0 eq 0
selectall_hashref by column number
ok 135
ok 136 - 0 eq 0
selectcol_arrayref
ok 137
ok 138
ok 139
selectcol_arrayref column slice
ok 140
ok 141
ok 142
ok 143
others...
ok 144
ok 145
RaiseError & PrintError & ShowErrorStatement
ok 146
ok 147
ok 148
ok 149
ok 150
ok 151
ok 152
ok 153
ok 154
ok 155
ok 156
ok 157
ok 158
ok 159
ok 160
ok 161 - DBD::ExampleP::st execute failed: 2 values bound when 1 expected [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at t/10examp.t line 368.
#
ok 162 - DBD::ExampleP::st execute failed: 2 values bound when 1 expected [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at t/10examp.t line 368.
#
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168
HandleError
ok 169
ok 170
HandleError -> die
ok 171
ok 172 - HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x313e180), rv=undef, \#=3] at t/10examp.t line 397.
#
HandleError -> 0 -> RaiseError
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x313e180), rv=undef, #=3]
ok 173
ok 174 - DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 at t/10examp.t line 418.
#
HandleError -> 1 -> return (original)undef
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x313e180), rv=undef, #=3]
ok 175 -
ok 176
HandleError -> 2 -> return (modified)42
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x313e180), rv=undef, #=3]
ok 177 -
ok 178
ok 179
ok 180 - The object isa DBI::st
ok 181
ok 182
ok 183
ok 184 - Remove dumpcsr.tst
ok 185 - Actually gone
# table_info
ok 186
# Local blib/lib subdirs: DBD auto .. . Bundle Win32 DBI
ok 187
ok 188
ok 189
# tables
ok 190 - Table count mismatch5 vs 5
ok 191 - "schema"."table" ne "schema"."table"
ok 192 - "sch-ema"."table" ne "sch-ema"."table"
ok 193 - "schema"."ta-ble" ne "schema"."ta-ble"
ok 194 - "sch ema"."table" ne "sch ema"."table"
ok 195 - "schema"."ta ble" ne "schema"."ta ble"
# Testing the fake directories (0).
ok 196
ok 197
ok 198 - 0 rows instead of 0
ok 199
# Testing the fake directories (100).
ok 200
ok 201
ok 202 - 100 rows instead of 100
ok 203 - 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
# Testing the fake directories (200).
ok 204
ok 205
ok 206 - 200 rows instead of 200
ok 207 - 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
# Testing $dbh->func().
ok 208
ok 209
ok 210 - ping should return false after disconnect
ok
t/11fetch.t ................
1..24
# fetchall_hashref(C1)
ok 1
ok 2
ok 3
ok 4
# fetchall_hashref(C2)
ok 5
ok 6
ok 7
ok 8
# fetchall_hashref([C2])
ok 9
ok 10
ok 11
ok 12
# fetchall_hashref([C1 C2])
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok
t/12quote.t ................
1..10
ok 1 - ... quoting strings with embedded single quotes
ok 2 - ... quoting number as SQL_VARCHAR
ok 3 - ... quoting number as SQL_INTEGER
ok 4 - ... quoting undef as NULL
ok 5 - ... properly quotes foo as "foo"
ok 6 - ... properly quotes f"o as "f""o"
ok 7 - ... properly quotes foo, bar as "foo"."bar"
ok 8 - ... properly quotes undef, undef, bar as "bar"
ok 9 - ... properly quotes foo, undef, bar as "foo"."bar"
ok 10 - ... now quotes it as "bar"@"foo" after flushing cache
ok
t/13taint.t ................
1..36
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19 - should execute ok
ok 20
ok 21
ok 22
ok 23
TaintIn
ok 24
ok 25
ok 26
ok 27
TaintOut
ok 28
ok 29
ok 30
ok 31
ok 32 - Insecure dependency in parameter 1 of DBI::db=HASH(0x3065c60)->prepare method call while running with -T switch at t/13taint.t line 113.
#
ok 33 - Insecure dependency in parameter 1 of DBI::st=HASH(0x3065e40)->execute method call while running with -T switch at t/13taint.t line 115.
#
ok 34 -
ok 35 -
ok 36
ok
t/14utf8.t .................
1..16
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok
t/15array.t ................
1..55
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - The object isa DBI::st
ok 4 - ... we should have 0 rows
ok 5 - ... execute_array should return false
ok 6 - execute_array failure with RaiseError should have died
ok 7
ok 8 - ... we should have 2 rows
ok 9 - ... we should have 3 tuple_status
ok 10 - ... our rows are as expected
ok 11 - ... our tuple_status is as expected
ok 12 - ... bind_param_array should return true
ok 13 - ... execute_array should return true
ok 14 - ... we should have 3 rows
ok 15 - ... we should have 3 tuple_status
ok 16 - ... our rows are as expected
ok 17 - ... our tuple_status is as expected
ok 18 - ... execute_array should return true
ok 19 - ... we should have executed 3 rows
ok 20 - ... we should have affected 3 rows
ok 21 - ... execute_array should return true
ok 22 - ... execute_array should return 0 (but true)
ok 23 - ... we should have 0 rows
ok 24 - ... we should have 0 tuple_status
ok 25 - ... execute_array should return 1
ok 26 - ... we should have 1 rows
ok 27 - ... our rows are as expected
ok 28 - ... we should have 1 tuple_status
ok 29 - ... our tuple_status is as expected
ok 30 - ... execute_array should return 0
ok 31 - ... we should have 0 rows
ok 32 - ... we should have 0 tuple_status
ok 33 - The object isa DBI::st
ok 34 - ... execute_array should return true
ok 35 - ... execute_array should return 0 (but true)
ok 36 - ... we should have 0 rows
ok 37 - ... execute_array should return true
ok 38 - ... we should have 2 rows
ok 39 - ... we should have 2 tuple_status
ok 40 - ... rows should match
ok 41 - ... tuple_status should match
ok 42 - The object isa DBI::st
ok 43 - ... execute_array should return true
ok 44 - ... we should have 3 rows
ok 45 - ... we should have 3 tuple_status
ok 46 - ... rows should match
ok 47 - ... tuple status should match
ok 48 - ... execute_array should return undef
ok 49 - ... errstr is as expected
ok 50 - ... execute_array should return undef
ok 51 - ... errstr is as expected
ok 52 - ... execute_array should return undef
ok 53 - ... errstr is as expected
ok 54 - ... bind_param_array should return undef
ok 55 - ... errstr is as expected
ok
t/16destroy.t ..............
1..20
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - Install test driver
ok 5 - Connect to test driver
ok 6 - Should start active
ok 7 - Should be active in DESTROY
ok 8 - Create with ActiveDestroy
ok 9 - InactiveDestroy should be set
ok 10 - Should start active
ok 11 - Should not be active in DESTROY
ok 12 - Create with AutoInactiveDestroy
ok 13 - InactiveDestroy should be set
ok 14 - Should start active
ok 15 - Should be active in DESTROY
ok 16 - Create with AutoInactiveDestroy again
ok 17 - InactiveDestroy should be set
ok 18 - Should start active
ok 19 - Child should be inactive on DESTROY
ok 20 - Should be active in DESTROY
ok
t/19fhtrace.t ..............
1..27
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking TraceLevel attribute
ok 4 - ... regular fh: trace file successfully created
ok 5 - ... regular fh: filehandle successfully set
ok 6 - ... regular fh: trace_msg
<- trace= 2 at 19fhtrace.t line 201
ok 7 - ... regular fh: file successfully changed
ok 8 - ... regular fh: trace_msg after changing trace output
Next logline
-> trace for DBD::ExampleP::db (DBI::db=HASH(0x3007af8)~0x3007a38 0) thr#24da08
<- trace= 2 at 19fhtrace.t line 214
ok 9 - Tracefile removed
ok 10 - Tracefile FOO opened
ok 11 - Tracefile created
ok 12 - Regression test
ok 13 - Traced message
ok 14 - Regression test
ok 15 - ... layered fh: file is layered: *** Test our layer
#
#
ok 16 - ... layered fh: filehandle successfully set
ok 17 - ... layered fh: trace_msg: Layered logline
#
#
<- trace(1, 'STDOUT')= 1 at 19fhtrace.t line 256
ok 18 - ... layered fh: close doesn't close: Layered logline
#
#
ok 19 - ... layered fh: trace_msg after change trace output: Layered logline
#
#
ok 20 - ... scalar trace: file is layered: *** Test our layer
#
#
ok 21 - ... scalar trace: filehandle successfully set
ok 22 - ... scalar trace: *** Test our layer
# <- trace(1, GLOB(0x2f1cda0))= 1 at 19fhtrace.t line 272
# Layered logline
#
#
Next logline
<- trace(1, 'STDOUT')= 1 at 19fhtrace.t line 278
ok 23 - ... scalar trace: close doesn't close: *** Test our layer
# <- trace(1, GLOB(0x2f1cda0))= 1 at 19fhtrace.t line 272
# Layered logline
#
#
ok 24 - ... scalar trace: after change trace output: *** Test our layer
# <- trace(1, GLOB(0x2f1cda0))= 1 at 19fhtrace.t line 272
# Layered logline
#
#
ok 25 - ... logger: trace_msg
#
Next logline
DBI::db=HASH(0x3007a38) trace level set to 0x0/1 (DBI @ 0x100/0) in DBI 1.615-ithread (pid 5672)
ok 26 - ... logger: close doesn't close
#
ok 27 - ... logger: trace_msg after change trace output
#
Next logline
<- disconnect= 1 at 19fhtrace.t line 164
<- FETCH('Active')= '' at ExampleP.pm line 260
<- DESTROY(DBI::db=HASH(3007a38))= undef
ok
t/20meta.t .................
1..8
ok 1 - use DBI;
ok 2 - use DBI::DBD::Metadata;
ok 3 - The object isa DBI::db
ok 4
ok 5
ok 6
ok 7
ok 8
ok
t/30subclass.t .............
1..36
ok 1 - use DBI;
ok 2 - The object isa MyDBI::db
ok 3
ok 4 - The object isa MyDBI::db
ok 5
ok 6
ok 7 - The object isa MyDBI::st
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15 - The reference isa ARRAY
ok 16
ok 17
ok 18
ok 19
ok 20 - Clone A isa MyDBI::db
ok 21
ok 22
ok 23 - Clone B isa MyDBI::db
ok 24
ok 25
ok 26 - The object isa MyDBI::db
ok 27
ok 28 - installed method isa ARRAY
ok 29
ok 30
ok 31
ok 32
ok 33 - Failed connect \#1
ok 34
ok 35 - Failed connect \#2
ok 36
fetch 4 prepare 1
ok
t/35thrclone.t .............
1..20
ok 1 - use DBI;
ok 2 - ... assignment of neat_maxlen was successful
ok 3 - The object isa DBI::db
ok 4 - ... DBI::neat_maxlen still holding its value
ok 5 - The object isa DBI::db
ok 6 - ... new $dbh is not the same instance as $dbh_parent
ok 7 - ... the Driver has one Kid
ok 8 - ... DBI::neat_maxlen still holding its value
ok 9 - The object isa DBI::db
ok 10 - ... new $dbh is not the same instance as $dbh_parent
ok 11 - ... the Driver has one Kid
ok 12 - ... DBI::neat_maxlen still holding its value
ok 13 - The object isa DBI::db
ok 14 - ... new $dbh is not the same instance as $dbh_parent
ok 15 - ... the Driver has one Kid
ok 16 - ... DBI::neat_maxlen still holding its value
ok 17 - The object isa DBI::db
ok 18 - ... new $dbh is not the same instance as $dbh_parent
ok 19 - ... the Driver has one Kid
ok 20 - ... all tests have passed
ok
t/40profile.t ..............
1..60
Test enabling the profile
ok 1
ok 2
ok 3
ok 4
ok 5
bless( {
'Path' => [
'!MethodName',
'!Caller2'
],
'Data' => {
'do' => {
'40profile.t line 80' => [
1,
'0',
'0',
'0',
'0',
'1291172473.02413',
'1291172473.02413'
]
}
}
}, 'DBI::Profile' )
ok 6
ok 7
ok 8
ok 9
ok 10
dbi_profile
bless( {
'Path' => [
'!Statement',
'!MethodName'
],
'Data' => {
'' => {
'connected' => [
1,
'0',
'0',
'0',
'0',
'1291172473.03975',
'1291172473.03975'
],
'FETCH' => [
1,
'0',
'0',
'0',
'0',
'1291172473.03975',
'1291172473.03975'
],
'STORE' => [
5,
'0',
'0',
'0',
'0',
'1291172473.03975',
'1291172473.03975'
]
},
'Hi mom' => {
'my_method_name' => [
1,
'1',
'1',
'1',
'1',
'1291172473.03975',
'1291172473.03975'
]
}
}
}, 'DBI::Profile' )
ok 11
ok 12
ok 13
ok 14 - should return ref to leaf node
ok 15 - should return ref to leaf node
ok 16 - should return ref to correct leaf node
1 1 1 1 1 1291172473.03975 1291172473.03975
ok 17
2 3 1 1 2 1291172473.03975 1291172473.03975
ok 18
Test collected profile data
bless( {
'Path' => [
'!Statement'
],
'Data' => {
'set foo=1' => [
1,
'0',
'0',
'0',
'0',
'1291172473.2585',
'1291172473.2585'
],
'' => [
7,
'0',
'0',
'0',
'0',
'1291172473.03975',
'1291172473.03975'
],
'select mode,size,name from ?' => [
2301,
'0.21875',
'0',
'0',
'0.015625',
'1291172473.03975',
'1291172473.2585'
]
}
}, 'DBI::Profile' )
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
ok 30
ok 31
ok 32
ok 33
ok 34
Test profile format
Profile Output
DBI::Profile: 0.218750s 100.00% (2309 calls) 40profile.t @ 2010-11-30 19:01:13
'' =>
0.000000s / 7 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'select mode,size,name from ?' =>
0.218750s / 2301 = 0.000095s avg (first 0.000000s, min 0.000000s, max 0.015625s)
'set foo=1' =>
0.000000s
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41 - should have 9 nodes
ok 42
testing '!File', '!Caller' and their variants in Path
ok 43
testing '!Time' and variants in Path
ok 44 - !Time and !Time~1000000 should work
testing &norm_std_n3 in Path
ok 45
ok 46 - &norm_std_n3 should normalize statement
testing code ref in Path
ok 47
ok 48
ok 49 - should be vetoed
ok 50 - $_ should contain statement
ok 51 - should have @_ as keys
ok 52 - should be able to filter by method
ok 53 - output should go to log file
testing as_text
ok 54
ok 55
ok 56
DBI::Profile: 2.000000s 200.00% (203 calls) 40profile.t @ 2010-11-30 19:01:14
'A' =>
'Z' =>
1.000000s / 101 = 0.009901s avg (first 2.000000s, min 3.000000s, max 4.000000s)
'B' =>
'Y' =>
1.000000s / 102 = 0.009804s avg (first 2.000000s, min 3.000000s, max 4.000000s)
dbi_profile_merge_nodes
ok 57
ok 58
ok 59
ok 60
DBI::Profile: 0.000000s 0.00% (12 calls) 40profile.t @ 2010-11-30 19:01:14
'foo' =>
'DESTROY' =>
'baz' =>
0.000000s
'FETCH' =>
'baz' =>
0.000000s
'STORE' =>
'baz' =>
0.000000s / 5 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'connected' =>
'baz' =>
0.000000s
'execute' =>
'baz' =>
0.000000s
'fetchrow_hashref' =>
'baz' =>
0.000000s
'finish' =>
'baz' =>
0.000000s
'prepare' =>
'baz' =>
0.000000s
ok
t/41prof_dump.t ............
1..15
ok 1 - use DBI;
ok 2 - use DBI::ProfileDumper;
ok 3 - The object isa DBI::db
ok 4 - The object isa DBI::ProfileDumper
ok 5 - The reference isa HASH
ok 6 - The reference isa ARRAY
ok 7 - The object isa DBI::st
ok 8
ok 9 - Profile is on disk and nonzero size
DBI::ProfileDumper 2.013956
Path = [ ]
Program = t/41prof_dump.t
+ 1
= 7 0 0 0 0 1291172474.11788 1291172474.11788
+ 1 select mode,size,name from ?
= 2 0 0 0 0 1291172474.11788 1291172474.11788
+ 1
= 2 0 0 0 0 1291172474.11788 1291172474.11788
+ 1 select mode,size,name from ?
= 47 0 0 0 0 1291172474.11788 1291172474.11788
ok 10 - Found a version number
ok 11 - Version numbers match in DBI::ProfileDumper 2.013956
#
ok 12 - Found the Path
ok 13 - Found the Program
ok 14
ok 15 # skip developer-only test
ok
t/42prof_data.t ............
1..31
ok 1 - use DBI::ProfileDumper;
ok 2 - use DBI::ProfileData;
ok 3 - Created connection isa DBI::db
ok 4 - Profile written to disk, non-zero size
ok 5 - The object isa DBI::ProfileData
ok 6 - At least 3 profile data items
ok 7
ok 8
ok 9
ok 10
ok 11 - The object isa DBI::ProfileData
ok 12
ok 13
ok 14 - The object isa DBI::ProfileData
ok 15
ok 16
ok 17
SQL: set dummy=N
SQL:
SQL: select mode,size,name from ?
ok 18 - Data for 'select mode,size,name from ?' should exist
ok 19 - Data for 'select mode,size,name from ?'->{execute} should exist
ok 20
ok 21 - Created connection isa DBI::db
ok 22 - The object isa DBI::st
ok 23 - The object isa DBI::st
ok 24 - The object isa DBI::st
ok 25 - The object isa DBI::st
ok 26 - The object isa DBI::st
ok 27 - The object isa DBI::st
ok 28 - The object isa DBI::ProfileData
ok 29 - file should be deleted when DeleteFiles set
ok 30 - Data for 'select size from . where name = "LITERAL: \r\n"' should exist
ok 31 - Data for 'select size from . where name = "EXPANDED:
# "' should exist
ok
t/43prof_env.t .............
1..11
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7 - $h->{Profile} should be shared
ok 8
ok 9
ok 10
ok 11
DBI::Profile: 0.000000s (25 calls) 43prof_env.t @ 2010-11-30 19:01:14
'' =>
'DESTROY' =>
0.000000s
'FETCH' =>
0.000000s / 4 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'STORE' =>
0.000000s / 10 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'connect' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'connected' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'disconnect' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'disconnect_all' =>
0.000000s
'set dummy=1' =>
'do' =>
0.000000s
'set dummy=2' =>
'DESTROY' =>
0.000000s
'do' =>
0.000000s
ok
t/49dbd_file.t .............
ok 1 - use DBI;
ok 2 - use DBD::File;
ok 3 - Connect clean
ok 4 - Can connect to DBD::File driver
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 5 - f_versions
ok 6 - Connect with DBI attributes
ok 7 - Connect with driver attributes in DSN
ok 8 - Connect with driver attributes in hash
ok 9 - Prepare select from non-existing file
ok 10 - Cannot open non-existing file
# C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4604\t_sbdgf_53442gz.txt
ok 11 - drop manually created table db_4604_2 (first file)
ok 12 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4604\db_4604_2.txt removed
ok 13 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4604\db_4604_2 exists
ok 14 - drop manually created table db_4604_2 (second file)
ok 15 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4604\db_4604_2 removed
ok 16 - Create table db_4604_
ok 17 - Test table exists
ok 18 - get single table meta data
ok 19 - get multiple meta data
ok 20 - encoding shows in layer
ok 21 - set single meta datum
ok 22 - verify set single meta datum
ok 23 - set multiple meta data
ok 24 - verify set multiple meta attributes
ok 25 - Prepare select * from db_4604_
ok 26 - execute on db_4604_
ok 27 - Prepare select * from DB_4604_
ok 28 - execute on DB_4604_
ok 29 - table drop
ok 30 - Test table removed
1..30
ok
t/50dbm_simple.t ...........
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable FreezeThaw YAML JSON
--- Using SDBM_File () ---
# DBD::DBM 0.06 using SDBM_File (1.06)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 1 - dbm_versions
ok 2 - The object isa DBI::db
ok 3
ok 4
ok 5
ok 6 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 7 - execute
ok 8 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 9 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 10 - execute
ok 11 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 12 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 13 - execute
ok 14 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 15 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 16 - execute
ok 17 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 18 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 19 - execute
ok 20 - INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 21 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 22 - execute
ok 23 - INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 24 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 25 - execute
ok 26 - INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 27 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 28 - execute
ok 29 - INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 30 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 31 - execute
ok 32 - INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 33 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 34 - execute
ok 35 - DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 36 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows
ok 37 - prepare UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 38 - execute
ok 39 - UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 40 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows
ok 41 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 42 - execute
ok 43 - DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 44 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows
ok 45 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 46 - execute
ok 47 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 48 - SELECT results
ok 49 - prepare DELETE FROM SDBM_File_fruit
ok 50 - execute
ok 51 - DELETE FROM SDBM_File_fruit
ok 52 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 53 - prepare DROP TABLE SDBM_File_fruit
ok 54 - execute
ok 55 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Data::Dumper
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 56 - dbm_versions
ok 57 - The object isa DBI::db
ok 58
ok 59
ok 60
ok 61 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 62 - execute
ok 63 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 64 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 65 - execute
ok 66 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 67 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 68 - execute
ok 69 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 70 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 71 - execute
ok 72 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 73 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 74 - execute
ok 75 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 76 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 77 - execute
ok 78 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 79 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 80 - execute
ok 81 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 82 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 83 - execute
ok 84 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 85 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 86 - execute
ok 87 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 88 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 89 - execute
ok 90 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 91 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 92 - execute
ok 93 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 94 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 95 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 96 - execute
ok 97 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 98 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 99 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 100 - execute
ok 101 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 102 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 103 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 104 - execute
ok 105 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 106 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 107 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 108 - execute
ok 109 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 110 - SELECT results
ok 111 - prepare DELETE FROM SDBM_File_fruit
ok 112 - execute
ok 113 - DELETE FROM SDBM_File_fruit
ok 114 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 115 - prepare DROP TABLE SDBM_File_fruit
ok 116 - execute
ok 117 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Storable
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 118 - dbm_versions
ok 119 - The object isa DBI::db
ok 120
ok 121
ok 122
ok 123 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 124 - execute
ok 125 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 126 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 127 - execute
ok 128 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 129 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 130 - execute
ok 131 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 132 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 133 - execute
ok 134 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 135 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 136 - execute
ok 137 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 138 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 139 - execute
ok 140 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 141 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 142 - execute
ok 143 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 144 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 145 - execute
ok 146 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 147 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 148 - execute
ok 149 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 150 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 151 - execute
ok 152 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 153 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 154 - execute
ok 155 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 156 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 157 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 158 - execute
ok 159 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 160 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 161 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 162 - execute
ok 163 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 164 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 165 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 166 - execute
ok 167 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 168 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 169 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 170 - execute
ok 171 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 172 - SELECT results
ok 173 - prepare DELETE FROM SDBM_File_fruit
ok 174 - execute
ok 175 - DELETE FROM SDBM_File_fruit
ok 176 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 177 - prepare DROP TABLE SDBM_File_fruit
ok 178 - execute
ok 179 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (FreezeThaw) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::FreezeThaw
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 180 - dbm_versions
ok 181 - The object isa DBI::db
ok 182
ok 183
ok 184
ok 185 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 186 - execute
ok 187 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 188 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 189 - execute
ok 190 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 191 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 192 - execute
ok 193 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 194 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 195 - execute
ok 196 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 197 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 198 - execute
ok 199 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 200 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 201 - execute
ok 202 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 203 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 204 - execute
ok 205 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 206 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 207 - execute
ok 208 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 209 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 210 - execute
ok 211 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 212 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 213 - execute
ok 214 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 215 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 216 - execute
ok 217 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 218 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 219 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 220 - execute
ok 221 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 222 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 223 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 224 - execute
ok 225 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 226 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 227 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 228 - execute
ok 229 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 230 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 231 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 232 - execute
ok 233 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 234 - SELECT results
ok 235 - prepare DELETE FROM SDBM_File_fruit
ok 236 - execute
ok 237 - DELETE FROM SDBM_File_fruit
ok 238 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 239 - prepare DROP TABLE SDBM_File_fruit
ok 240 - execute
ok 241 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (YAML) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::YAML (0.10)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 242 - dbm_versions
ok 243 - The object isa DBI::db
ok 244
ok 245
ok 246
ok 247 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 248 - execute
ok 249 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 250 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 251 - execute
ok 252 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 253 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 254 - execute
ok 255 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 256 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 257 - execute
ok 258 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 259 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 260 - execute
ok 261 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 262 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 263 - execute
ok 264 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 265 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 266 - execute
ok 267 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 268 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 269 - execute
ok 270 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 271 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 272 - execute
ok 273 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 274 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 275 - execute
ok 276 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 277 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 278 - execute
ok 279 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 280 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 281 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 282 - execute
ok 283 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 284 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 285 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 286 - execute
ok 287 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 288 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 289 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 290 - execute
ok 291 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 292 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 293 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 294 - execute
ok 295 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 296 - SELECT results
ok 297 - prepare DELETE FROM SDBM_File_fruit
ok 298 - execute
ok 299 - DELETE FROM SDBM_File_fruit
ok 300 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 301 - prepare DROP TABLE SDBM_File_fruit
ok 302 - execute
ok 303 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (JSON) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::JSON (0.001)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 304 - dbm_versions
ok 305 - The object isa DBI::db
ok 306
ok 307
ok 308
ok 309 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 310 - execute
ok 311 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 312 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 313 - execute
ok 314 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 315 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 316 - execute
ok 317 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 318 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 319 - execute
ok 320 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 321 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 322 - execute
ok 323 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 324 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 325 - execute
ok 326 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 327 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 328 - execute
ok 329 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 330 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 331 - execute
ok 332 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 333 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 334 - execute
ok 335 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 336 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 337 - execute
ok 338 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 339 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 340 - execute
ok 341 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 342 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 343 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 344 - execute
ok 345 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 346 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 347 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 348 - execute
ok 349 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 350 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 351 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 352 - execute
ok 353 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 354 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 355 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 356 - execute
ok 357 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 358 - SELECT results
ok 359 - prepare DELETE FROM SDBM_File_fruit
ok 360 - execute
ok 361 - DELETE FROM SDBM_File_fruit
ok 362 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 363 - prepare DROP TABLE SDBM_File_fruit
ok 364 - execute
ok 365 - DROP TABLE SDBM_File_fruit
1..365
ok
t/51dbm_file.t .............
ok 1 - drop table
ok 2 - FRED.dir exists
ok 3 - fred.dir exists
ok 4 - insert into mixed case table
ok 5 - insert into uppercase table
ok 6 - rows found via cloned mixed case table
ok 7 - drop table
ok 8 - rows found via mixed case table
ok 9 # skip quoted identifiers aren't supported by DBI::SQL::Nano
ok 10 - drop table
1..10
ok
t/52dbm_complex.t .......... skipped: Not running with SQL::Statement
t/60preparse.t .............
1..39
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok
t/65transact.t .............
1..10
begin_work...
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok
t/70callbacks.t ............
1..63
ok 1 - Create dbh
ok 2 - Callbacks initially undef
ok 3
ok 4 - Callbacks can be set to a hash ref
ok 5 - Callbacks set to same hash ref
ok 6 - Callbacks set to undef again
ok 7
ok 8
ok 9
ok 10 - $_ holds method name
ok 11 - @_ holds 1 values
ok 12 - first is $dbh
ok 13
ok 14
ok 15 - $_ not altered by callback
ok 16 - $_ holds method name
ok 17 - @_ holds 1 values
ok 18 - first is $dbh
ok 19
ok 20
ok 21
ok 22 - fallback callback
ok 23 - @_ holds 4 values
ok 24 - first is $dbh
ok 25
ok 26
ok 27
ok 28
ok 29 - quote_identifier callback caused fatal error
ok 30 - param modified by callback - not recommended!
ok 31
ok 32 - You can't disconnect that easily!
#
ok 33
ok 34
ok 35
ok 36 - should return a single value in list context
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42 - intercepted commit should return undef
ok 43
ok 44
ok 45
ok 46 - Create handle with callbacks
ok 47 - no callback for plain connect
ok 48 - Create handle with callbacks
ok 49 - connect_cached.new called
ok 50 - connect_cached.reused not yet called
ok 51 - Create handle with callbacks
ok 52 - connect_cached.reused called
ok 53 - connect_cached.new not called again
ok 54 - Create handle with ChildCallbacks
ok 55 - Ping
ok 56 - Ping callback should have been called
ok 57 - Prepare a statement handle (child)
ok 58 - child should have Callbacks
ok 59 - child Callbacks should be ChildCallbacks of parent
ok 60 - Execute
ok 61 - Execute callback should have been called
ok 62 - Fetch
ok 63 - Fetch callback should have been called
ok
t/72childhandles.t .........
1..16
ok 1
ok 2
ok 3
ok 4
ok 5 - All handles should be undef now
ok 6 - ChildHandles should be an array-ref if wekref is available
ok 7
drh DBI::dr=HASH(0x2f8ca58)
dbh DBI::db=HASH(0x2f8cce0)
sth DBI::st=HASH(0x2f8de88)
sth DBI::st=HASH(0x2c229c0)
sth DBI::st=HASH(0x2f8de10)
ok 8
ok 9
ok 10
ok 11
ok 12 - handles should be gone now
ok 13
ok 14
ok 15
ok 16
ok
t/80proxy.t ................ skipped: modules required for proxy are probably not installed (e.g., RPC/PlClient.pm)
t/85gofer.t ................
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_1140;dbm_type=SDBM_File;f_lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_1140;dbm_type=SDBM_File;f_lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x4d61050)
ok 20
ok 21
ok 22
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_1140;dbm_type=SDBM_File;f_lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_1140;dbm_type=SDBM_File;f_lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x4d38540)
ok 46
ok 47
ok 48
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_1140;dbm_type=SDBM_File;f_lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_1140;dbm_type=SDBM_File;f_lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x4d6db90)
ok 72
ok 73
ok 74
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
1..78
ok
t/86gofer_fail.t ...........
ok 1 - should fail 100% of the time
ok 2 - $@ should be set
ok 3
ok 4 - errstr should be set
ok 5 - errstr should contain DBI_GOFER_RANDOM
ok 6 - go_response executed flag should be false
target approx 50% random failures, got 48.5%
ok 7 - should fail about 50% of the time, but at least between 10% and 90% (got 48.5)
ok 8 - should fail about 50% of the time, but at least between 10% and 90% (got 48.5)
target less than 20% effective random failures (ideally 0), got 0%
ok 9 - should fail < 20%
ok 10 - should fail < 1%
ok 11
ok 12 - should fail ~25% (ie 50% with one retry) (got 22)
ok 13 - should fail ~25% (ie 50% with one retry) (got 22)
ok 14 - transport request_retry_count should be around 50 (got 44)
ok 15 - transport request_retry_count should be around 50 (got 44)
ok 16
ok 17 - should fail ~50%, ie no retries (got 50)
ok 18 - should fail ~50%, ie no retries (got 50)
ok 19 - transport request_retry_count should be zero or undef
ok 20 - positive percentage should fail randomly
ok 21 - negative percentage should fail non-randomly
Testing random delay
ok 22
ok 23 - should not fail for DBI_GOFER_RANDOM='delay0.1=51%,do'
ok 24 - should be delayed around 5 times (got 11)
ok 25 - should be delayed around 5 times (got 11)
1..25
ok
t/87gofer_cache.t ..........
using DBI::Util::CacheMemory=HASH(0x2f9e280) for dbi:Gofer:transport=null;policy=classic;dsn=dbi:ExampleP:
ok 1
ok 2
ok 3 - cache should be empty after clear
ok 4 - transmit_count should be 0
ok 5
ok 6 - cache should not be empty after select
ok 7
ok 8
ok 9
ok 10 - should make 1 round trip
ok 11 - transmit_count should be 0
ok 12
ok 13
ok 14 - should make 1 round trip
ok 15
ok 16
ok 17
using 1 for dbi:Gofer:transport=null;policy=classic;dsn=dbi:ExampleP:
ok 18
ok 19
ok 20 - cache should be empty after clear
ok 21 - transmit_count should be 0
ok 22
ok 23 - cache should not be empty after select
ok 24
ok 25
ok 26
ok 27 - should make 1 round trip
ok 28 - transmit_count should be 0
ok 29
ok 30
ok 31 - should make 1 round trip
ok 32
ok 33
ok 34
test per-sth go_cache
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
1..47
ok
t/90sql_type_cast.t ........
1..36
ok 1 - result, undef
ok 2 - json undef
ok 3 - result, invalid sql type
ok 4 - json invalid sql type
ok 5 - result, non numeric cast to int
ok 6 - json non numeric cast to int
ok 7 - result, non numeric cast to int (strict)
ok 8 - json non numeric cast to int (strict)
ok 9 - result, small int cast to int
ok 10 - json small int cast to int
ok 11 - result, 2 byte max signed int cast to int
ok 12 - json 2 byte max signed int cast to int
ok 13 - result, 2 byte max unsigned int cast to int
ok 14 - json 2 byte max unsigned int cast to int
ok 15 - result, 4 byte max signed int cast to int
ok 16 - json 4 byte max signed int cast to int
ok 17 - result, 4 byte max unsigned int cast to int
ok 18 - json 4 byte max unsigned int cast to int
ok 19 - result, small int cast to int (discard)
ok 20 - json small int cast to int (discard)
ok 21 - result, non numeric cast to numeric
ok 22 - json non numeric cast to numeric
ok 23 - result, non numeric cast to numeric (strict)
ok 24 - json non numeric cast to numeric (strict)
ok 25 - result, very large int cast to int
ok 26 - json very large int cast to int
ok 27 - result, very large int cast to int (strict)
ok 28 - json very large int cast to int (strict)
ok 29 - result, float cast to int
ok 30 - json float cast to int
ok 31 - result, float cast to int (strict)
ok 32 - json float cast to int (strict)
ok 33 - result, float cast to double
ok 34 - json float cast to double
ok 35 - result, 4 byte max unsigned int cast to int (ivsize>8)
ok 36 - json 4 byte max unsigned int cast to int (ivsize>8)
ok
t/pod-coverage.t ........... skipped: Currently a developer-only test
t/pod.t ....................
1..59
ok 1 - POD test for blib\lib\DBI.pm
ok 2 - POD test for blib\lib\dbixs_rev.pl (no pod)
ok 3 - POD test for blib\script\dbilogstrip
ok 4 - POD test for blib\script\dbilogstrip.bat
ok 5 - POD test for blib\script\dbiprof
ok 6 - POD test for blib\script\dbiprof.bat
ok 7 - POD test for blib\script\dbiproxy
ok 8 - POD test for blib\script\dbiproxy.bat
ok 9 - POD test for blib\lib\Bundle\DBI.pm
ok 10 - POD test for blib\lib\DBD\DBM.pm
ok 11 - POD test for blib\lib\DBD\ExampleP.pm (no pod)
ok 12 - POD test for blib\lib\DBD\File.pm
ok 13 - POD test for blib\lib\DBD\Gofer.pm
ok 14 - POD test for blib\lib\DBD\NullP.pm (no pod)
ok 15 - POD test for blib\lib\DBD\Proxy.pm
ok 16 - POD test for blib\lib\DBD\Sponge.pm
ok 17 - POD test for blib\lib\DBI\Changes.pm
ok 18 - POD test for blib\lib\DBI\DBD.pm
ok 19 - POD test for blib\lib\DBI\FAQ.pm
ok 20 - POD test for blib\lib\DBI\Profile.pm
ok 21 - POD test for blib\lib\DBI\ProfileData.pm
ok 22 - POD test for blib\lib\DBI\ProfileDumper.pm
ok 23 - POD test for blib\lib\DBI\ProfileSubs.pm
ok 24 - POD test for blib\lib\DBI\ProxyServer.pm
ok 25 - POD test for blib\lib\DBI\PurePerl.pm
ok 26 - POD test for blib\lib\DBI\W32ODBC.pm
ok 27 - POD test for blib\lib\Win32\DBIODBC.pm
ok 28 - POD test for blib\lib\DBD\File\Developers.pod
ok 29 - POD test for blib\lib\DBD\File\HowTo.pod
ok 30 - POD test for blib\lib\DBD\File\Roadmap.pod
ok 31 - POD test for blib\lib\DBI\Const\GetInfoReturn.pm
ok 32 - POD test for blib\lib\DBI\Const\GetInfoType.pm
ok 33 - POD test for blib\lib\DBI\DBD\Metadata.pm
ok 34 - POD test for blib\lib\DBI\DBD\SqlEngine.pm
ok 35 - POD test for blib\lib\DBI\Gofer\Execute.pm
ok 36 - POD test for blib\lib\DBI\Gofer\Request.pm
ok 37 - POD test for blib\lib\DBI\Gofer\Response.pm
ok 38 - POD test for blib\lib\DBI\ProfileDumper\Apache.pm
ok 39 - POD test for blib\lib\DBI\SQL\Nano.pm
ok 40 - POD test for blib\lib\DBI\Util\CacheMemory.pm
ok 41 - POD test for blib\lib\DBI\Util\_accessor.pm (no pod)
ok 42 - POD test for blib\lib\DBD\Gofer\Policy\Base.pm
ok 43 - POD test for blib\lib\DBD\Gofer\Policy\classic.pm
ok 44 - POD test for blib\lib\DBD\Gofer\Policy\pedantic.pm
ok 45 - POD test for blib\lib\DBD\Gofer\Policy\rush.pm
ok 46 - POD test for blib\lib\DBD\Gofer\Transport\Base.pm
ok 47 - POD test for blib\lib\DBD\Gofer\Transport\null.pm
ok 48 - POD test for blib\lib\DBD\Gofer\Transport\pipeone.pm
ok 49 - POD test for blib\lib\DBD\Gofer\Transport\stream.pm
ok 50 - POD test for blib\lib\DBI\Const\GetInfo\ANSI.pm
ok 51 - POD test for blib\lib\DBI\Const\GetInfo\ODBC.pm
ok 52 - POD test for blib\lib\DBI\DBD\SqlEngine\Developers.pod
ok 53 - POD test for blib\lib\DBI\DBD\SqlEngine\HowTo.pod
ok 54 - POD test for blib\lib\DBI\Gofer\Serializer\Base.pm
ok 55 - POD test for blib\lib\DBI\Gofer\Serializer\DataDumper.pm
ok 56 - POD test for blib\lib\DBI\Gofer\Serializer\Storable.pm
ok 57 - POD test for blib\lib\DBI\Gofer\Transport\Base.pm
ok 58 - POD test for blib\lib\DBI\Gofer\Transport\pipeone.pm
ok 59 - POD test for blib\lib\DBI\Gofer\Transport\stream.pm
ok
t/zvg_01basics.t ...........
1..130
ok 1 - use DBI;
ok 2 - ... testing sql_type
ok 3 - ... testing sql_type
ok 4 - ... testing sql_type
ok 5 - ... testing sql_type
ok 6 - ... testing sql_type
ok 7 - ... testing sql_type
ok 8 - ... testing sql_type
ok 9 - ... testing sql_type
ok 10 - ... testing sql_type
ok 11 - ... testing sql_type
ok 12 - ... testing sql_type
ok 13 - ... testing sql_type
ok 14 - ... testing sql_type
ok 15 - ... testing sql_type
ok 16 - ... testing sql_type
ok 17 - ... testing sql_type
ok 18 - ... testing sql_type
ok 19 - ... testing sql_type
ok 20 - ... testing sql_type
ok 21 - ... testing sql_type
ok 22 - ... testing sql_type
ok 23 - ... testing sql_type
ok 24 - ... testing sql_type
ok 25 - ... testing sql_type
ok 26 - ... testing sql_type
ok 27 - ... testing sql_type
ok 28 - ... testing sql_type
ok 29 - ... testing sql_type
ok 30 - ... testing sql_type
ok 31 - ... testing sql_type
ok 32 - ... testing sql_type
ok 33 - ... testing sql_type
ok 34 - ... testing sql_type
ok 35 - ... testing sql_type
ok 36 - ... testing sql_type
ok 37 - ... testing sql_type
ok 38 - ... testing sql_type
ok 39 - ... testing sql_type
ok 40 - ... testing sql_type
ok 41 - ... testing sql_type
ok 42 - ... testing sql_type
ok 43 - ... testing sql_type
ok 44 - ... testing sql_type
ok 45 - ... testing sql_type
ok 46 - ... testing sql_type
ok 47 - ... testing sql_type
ok 48 - ... testing sql_type
ok 49 - ... testing sql_type
ok 50 - ... testing sql_type
ok 51 - ... testing sql_type
ok 52 - ... testing sql_type
ok 53 - ... testing sql_type
ok 54 - ... testing sql_type
ok 55 - ... testing sql_type
ok 56 - ... testing sql_type
ok 57 - ... testing sql_type
ok 58 - ... testing sql_type
ok 59 - ... testing sql_type
ok 60 - ... testing sql_cursor_types
ok 61 - ... testing sql_cursor_types
ok 62 - ... testing sql_cursor_types
ok 63 - ... testing sql_cursor_types
ok 64 - ... testing sql_cursor_types
ok 65 - ... looks_like_number : undef -> undef
ok 66 - ... looks_like_number : "" -> undef (eg "don't know")
ok 67 - ... looks_like_number : "foo" -> defined false
ok 68 - ... looks_like_number : "foo" -> defined false
ok 69 - ... looks_like_number : 1 -> true
ok 70 - ... looks_like_number : "." -> false
ok 71 - ... looks_like_number : 1 -> true
ok 72 - ... looks_like_number : 1 -> true
ok 73 - ... 1000 initial state is 400
ok 74 - ... neat : 1 + 1 -> "2"
ok 75 - ... neat : 2 -> "'2'"
ok 76 - ... neat : undef -> "undef"
ok 77 - ... test array argument w/seperator and maxlen
ok 78 - ... test array argument w/out seperator or maxlen
ok 79 - The object isa DBI::dr
ok 80 - ... test debug
ok 81 - ... test DebugDispatch
ok 82 - ... test Warn
ok 83 - ... this should say Tim Bunce
ok 84 - ... the version should match DBI version
ok 85 - ... this should work and return 1
ok 86 - ... this should equal 1
ok 87 - ... CachedKids should be undef initially
ok 88 - ... CachedKids should be our ref
ok 89 - ... this should be zero
ok 90 - ... this should be zero
ok 91 - ... Active flag is true
ok 92 - ... we should get a warning here
ok 93 - ... we should get a warning here
ok 94 - ... we should get no warnings here
ok 95 - ... we at least have one driver installed
ok 96 - ... we should at least have ExampleP installed
ok 97 - ... we should at least have one driver
ok 98 - ... should be -1077531989
ok 99 - ... should be -1077531989
ok 100 - ... should be -1077531990
ok 101
ok 102
ok 103
ok 104
ok 105
ok 106
ok 107
ok 108
ok 109
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116
ok 117
ok 118
ok 119
ok 120
ok 121
ok 122
ok 123
ok 124 # skip developer tests
ok 125 # skip developer tests
ok 126 # skip developer tests
ok 127 # skip developer tests
ok 128 - ... DBI::dbi_debug's initial state is 0
ok 129 - ... DBI::dbi_debug is 15
ok 130 - ... DBI::dbi_debug is 0
ok
t/zvg_02dbidrv.t ...........
1..53
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - ... DBD::Test->driver called to getnew Driver handle
ok 5 - ... new Driver handle (DBI::dr=HASH(0x2e3afc8)) created successfully
ok 6 - The object isa DBI::dr
ok 7 - ... got a Test Driver object back from DBI->install_driver
ok 8 - The object isa DBI::dr
ok 9 - ... checking the DBI::_get_imp_data function
ok 10 - ... Driver object passed to data_sources
ok 11 - The object isa DBI::dr
ok 12 - ... Driver object is not tied
ok 13 - ... got correct datasources from DBI->data_sources("Test")
ok 14 - ... this Driver does not yet have any Kids
ok 15 - ... got a database handle from calling $drh->connect
ok 16 - The object isa DBI::db
ok 17 - ... this Driver does not yet have any Kids
ok 18 - ... Driver object passed to data_sources
ok 19 - The object isa DBI::dr
ok 20 - ... Driver object is not tied
ok 21 - ... checking fetched datasources from Driver
ok 22 - ... got correct datasources from $dbh->data_sources()
ok 23 - ... Database object passed to do
ok 24 - The object isa DBI::db
ok 25 - ... Database object is not tied
ok 26 - ... got Driver object from Database object with Driver attribute
ok 27 - The object isa DBI::dr
ok 28 - ... Driver object is not tied
ok 29 - ... got Driver object from Database object by FETCH-ing Driver attribute
ok 30 - The object isa DBI::dr
ok 31 - ... Driver object is not tied
ok 32 - ... this will trigger more driver internal tests above in DBD::Test::db
ok 33 - ... checking Driver handle err set with set_err method
ok 34 - ... checking Database handle err set with set_err method
ok 35 - ... checking Database handle err set with Driver handle set_err method
ok 36 - ... this Driver does not yet have any Kids
ok 37 - ... $dbh->DESTROY should set $drh->err to 42
ok 38 - ... checking $DBI::err set with Driver handle set_err method
ok 39 - ... checking $DBI::errstr
ok 40 - ... checking $DBI::state
ok 41 - ... checking $DBI::state
ok 42 - ... checking $DBI::state
ok 43 - ... trying to assign to $DBI::rows should throw an excpetion
ok 44 - ... FetchHashKeyName is NAME
ok 45 - ... FetchHashKeyName is now changed to NAME_lc
ok 46 - ... calling $drh->disconnect_all (not implemented but will fail silently)
ok 47 - has dbixs_revision
ok 48 - has integer dbixs_revision
ok 49 - ... $drh can FETCH
ok 50 - ... and it returned a proper CODE ref
ok 51 - ... used FETCH returned from can to fetch the Name attribute
ok 52 - ... the Name attribute is equal to Test
ok 53 - ...
ok
t/zvg_03handle.t ...........
1..137
ok 1 - use DBI;
ok 2
ok 3 - The object isa DBI::dr
ok 4 - ... this Driver does not yet have any Kids
ok 5
ok 6
ok 7
ok 8 - The object isa DBI::db
ok 9 - ... our Driver has one Kid
ok 10 - ... our Driver has one ActiveKid
ok 11 - The object isa DBI::st
ok 12 - ... execute ran successfully
ok 13 - ... we got the CachedKids hash
ok 14 - ... there is one CachedKid
ok 15 - ... our statment handle should be in the CachedKids
ok 16 - ... our first statment is Active
ok 17 - The object isa DBI::st
ok 18 - ... prepare_cached returned the same statement handle
ok 19 - ... we got warned about our first statement handle being still active
ok 20 - ... our first statment is no longer Active since we re-prepared it
ok 21 - The object isa DBI::st
ok 22 - ... prepare_cached returned a different statement handle now
ok 23 - ... there are two CachedKids
ok 24 - ... both statment handles should be in the CachedKids
ok 25 - ... executing first statement handle again
ok 26 - ... first statement handle is now active again
ok 27 - The object isa DBI::st
ok 28 - ... our fourth statement handle is not the same as our first
ok 29 - ... first statement handle is still active
ok 30 - ... there are two CachedKids
ok 31 - ... second and fourth statment handles should be in the CachedKids
ok 32 - ... first statement handle is no longer active
ok 33 - ... fourth statement handle executed properly
ok 34 - ... fourth statement handle is Active
ok 35 - The object isa DBI::st
ok 36 - ... we still only got one warning
ok 37 - ... fourth statement handle and fifth one match
ok 38 - ... fourth statement handle is not Active
ok 39 - ... fifth statement handle is not Active (shouldnt be its the same as fifth)
ok 40 - ... there are two CachedKids
ok 41 - ... second and fourth/fifth statment handles should be in the CachedKids
ok 42 - ... sixth statement handle is active
ok 43 - ... first statement handle is not active
ok 44 - ... first statement handle becomes the sixth
ok 45 - ... sixth statement handle is now not active
ok 46 - ... first statement handle is now active again
ok 47 - ... first statement handle becomes the sixth
ok 48 - ... sixth statement handle is active
ok 49 - ... first statement handle is not active
ok 50 - ... first statement handle becomes the sixth
ok 51 - ... sixth statement handle is now not active
ok 52 - ... first statement handle is now active again
ok 53 - ... can not swap a sth with a dbh
ok 54
ok 55 - ... first statement handle becomes the sixth
ok 56 - ... sixth statement handle is active
ok 57 - ... first statement handle is not active
ok 58
ok 59
ok 60 - ... can't swap_inner_handle with handle from different parent
ok 61
ok 62
ok 63 - ... can swap to different parent if forced
ok 64
ok 65 - ping should be true before disconnect
ok 66 - ping should be false after disconnect
ok 67 - ... our Driver has one Kid after disconnect
ok 68 - ... our Driver has no ActiveKids after disconnect
ok 69 - ... our ExampleP driver should have 0 Kids after dbh was destoryed
ok 70 # skip drh Kids not testable under DBD::Gofer
ok 71 # skip drh Kids not testable under DBD::Gofer
ok 72 # skip drh Kids not testable under DBD::Gofer
ok 73 # skip drh Kids not testable under DBD::Gofer
ok 74 # skip drh Kids not testable under DBD::Gofer
ok 75 # skip drh Kids not testable under DBD::Gofer
ok 76 # skip drh Kids not testable under DBD::Gofer
ok 77 # skip drh Kids not testable under DBD::Gofer
ok 78 # skip drh Kids not testable under DBD::Gofer
ok 79 # skip drh Kids not testable under DBD::Gofer
ok 80 # skip drh Kids not testable under DBD::Gofer
ok 81 # skip drh Kids not testable under DBD::Gofer
ok 82 # skip drh Kids not testable under DBD::Gofer
ok 83 # skip drh Kids not testable under DBD::Gofer
ok 84 # skip drh Kids not testable under DBD::Gofer
ok 85 # skip drh Kids not testable under DBD::Gofer
ok 86 # skip drh Kids not testable under DBD::Gofer
ok 87 # skip drh Kids not testable under DBD::Gofer
ok 88 # skip drh Kids not testable under DBD::Gofer
ok 89 # skip drh Kids not testable under DBD::Gofer
ok 90 # skip drh Kids not testable under DBD::Gofer
ok 91 # skip drh Kids not testable under DBD::Gofer
ok 92 # skip drh Kids not testable under DBD::Gofer
ok 93 # skip drh Kids not testable under DBD::Gofer
ok 94 # skip drh Kids not testable under DBD::Gofer
ok 95 # skip take_imp_data test not supported under DBD::Gofer
ok 96 # skip take_imp_data test not supported under DBD::Gofer
ok 97 # skip take_imp_data test not supported under DBD::Gofer
ok 98 # skip take_imp_data test not supported under DBD::Gofer
ok 99 # skip take_imp_data test not supported under DBD::Gofer
ok 100 # skip take_imp_data test not supported under DBD::Gofer
ok 101 # skip take_imp_data test not supported under DBD::Gofer
ok 102 # skip take_imp_data test not supported under DBD::Gofer
ok 103 # skip take_imp_data test not supported under DBD::Gofer
ok 104 # skip take_imp_data test not supported under DBD::Gofer
ok 105 # skip take_imp_data test not supported under DBD::Gofer
ok 106 # skip take_imp_data test not supported under DBD::Gofer
ok 107 # skip take_imp_data test not supported under DBD::Gofer
ok 108 # skip take_imp_data test not supported under DBD::Gofer
ok 109 # skip take_imp_data test not supported under DBD::Gofer
ok 110 # skip take_imp_data test not supported under DBD::Gofer
ok 111 # skip take_imp_data test not supported under DBD::Gofer
ok 112 # skip take_imp_data test not supported under DBD::Gofer
ok 113 # skip take_imp_data test not supported under DBD::Gofer
ok 114 - ... our Driver has no Kids after this test
ok 115 - The object isa DBI::dr
ok 116 - ... our Driver (2) has no Kids before this test
ok 117 - The object isa DBI::db
ok 118 - The object isa DBI::st
ok 119 - ... NUM_OF_PARAMS is 0
ok 120 - ... NUM_OF_FIELDS should be undef
ok 121 - ... Statement is "foo bar"
ok 122 - ... NAME is undefined
ok 123 - ... TYPE is undefined
ok 124 - ... SCALE is undefined
ok 125 - ... PRECISION is undefined
ok 126 - ... NULLABLE is undefined
ok 127 - ... RowsInCache is undefined
ok 128 - ... ParamValues is undefined
ok 129 - ... NAME_uc is undefined
ok 130 - ... NAME_lc is undefined
ok 131 - ... NAME_hash is undefined
ok 132 - ... NAME_uc_hash is undefined
ok 133 - ... NAME_lc_hash is undefined
ok 134 - ... $dbh can call "prepare"
ok 135 - ... $dbh cannot call "nonesuch"
ok 136 - ... $sth can call "execute"
ok 137 - ... our Driver (2) has no Kids after this test
ok
t/zvg_04mods.t .............
1..12
ok 1 - use DBI;
ok 2 - use DBI::Const::GetInfo::ANSI;
ok 3 - use DBI::Const::GetInfo::ODBC;
ok 4 - use DBI::Const::GetInfoType;
ok 5 - use DBI::Const::GetInfoReturn;
ok 6 - ... we have at least one key in the GetInfoType hash
ok 7 - ... the GetInfoType hash is constructed from the ANSI and ODBC hashes
ok 8 - ... we have at least one key in the GetInfoReturnType hash
ok 9 - ... the GetInfoReturnType hash is constructed from the ANSI and ODBC hashes
ok 10 - ... we have at least one key in the GetInfoReturnValues hash
ok 11 - DBI::Const::GetInfoReturn->can('Format')
ok 12 - DBI::Const::GetInfoReturn->can('Explain')
ok
t/zvg_05concathash.t .......
1..41
ok 1 - use DBI;
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9 - should work with nul bytes in kv_sep and pair_sep
ok 10 - should work with nul bytes in hash value (neat)
ok 11 - should work with nul bytes in hash value (not neat)
ok 12
ok 13
ok 14
ok 15 - test
ok 16 - test
ok 17 - Unknown sort order
ok 18 - Float Hash - Not Neat lexical
ok 19 - Numeric - Not Neat lexical
ok 20 - Mixed Hash - Not Neat lexical
ok 21 - Simple Hash - Not Neat lexical
ok 22 - Float Hash - Neat lexical
ok 23 - Numeric - Neat lexical
ok 24 - Mixed Hash - Neat lexical
ok 25 - Simple Hash - Neat lexical
ok 26 - Float Hash - Not Neat guess
ok 27 - Numeric - Not Neat guess
ok 28 - Mixed Hash - Not Neat guess
ok 29 - Simple Hash - Not Neat guess
ok 30 - Float Hash - Neat guess
ok 31 - Numeric - Neat guess
ok 32 - Mixed Hash - Neat guess
ok 33 - Simple Hash - Neat guess
ok 34 - Float Hash - Not Neat numeric
ok 35 - Numeric - Not Neat numeric
ok 36 - Mixed Hash - Not Neat numeric
ok 37 - Simple Hash - Not Neat numeric
ok 38 - Float Hash - Neat numeric
ok 39 - Numeric - Neat numeric
ok 40 - Mixed Hash - Neat numeric
ok 41 - Simple Hash - Neat numeric
ok
t/zvg_06attrs.t ............
1..148
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking Warn attribute for dbh
ok 4 - ... checking Active attribute for dbh
ok 5 - ... checking AutoCommit attribute for dbh
ok 6 - ... checking CompatMode attribute for dbh
ok 7 - ... checking InactiveDestory attribute for dbh
ok 8 - ... checking AutoInactiveDestory attribute for dbh
ok 9 - ... checking PrintError attribute for dbh
ok 10 - ... checking PrintWarn attribute for dbh
ok 11 - ... checking RaiseError attribute for dbh
ok 12 - ... checking ShowErrorStatement attribute for dbh
ok 13 - ... checking ChopBlanks attribute for dbh
ok 14 - ... checking LongTrunkOk attribute for dbh
ok 15 - ... checking TaintIn attribute for dbh
ok 16 - ... checking TaintOut attribute for dbh
ok 17 - ... checking Taint attribute for dbh
ok 18 - ... checking Executed attribute for dbh
ok 19 - ... checking ErrCount attribute for dbh
ok 20 - ... checking Kids attribute for dbh
ok 21 - ... checking ActiveKids attribute for dbh
ok 22 - ... checking CachedKids attribute for dbh
ok 23 - ... checking HandleError attribute for dbh
ok 24 - ... checking Profile attribute for dbh
ok 25 - ... checking Statement attribute for dbh
ok 26 - ... checking RowCacheSize attribute for dbh
ok 27 - ... checking ReadOnly attribute for dbh
ok 28 - ... checking FetchHashKeyName attribute for dbh
ok 29
ok 30 - ... checking TraceLevel attribute for dbh
ok 31 - ... checking LongReadLen attribute for dbh
ok 32 - should be able to FETCH_many
ok 33 - should see driver-private dbh attribute value
ok 34 - ... catching exception
ok 35 - ... $dbh->err is undefined
ok 36 - ... checking $dbh->errstr
ok 37 - ... checking $dbh->state
ok 38 - ... checking Executed attribute for dbh
ok 39 - ... checking Executed attribute for dbh (after reset)
ok 40 - ... checking ErrCount attribute for dbh (after error was generated)
ok 41 - The object isa DBI::dr
ok 42 - ... checking $dbh->err
ok 43 - ... checking ErrCount attribute for drh
ok 44 - ... checking Warn attribute for drh
ok 45 - ... checking Active attribute for drh
ok 46 - ... checking AutoCommit attribute for drh
ok 47 - ... checking CompatMode attribute for drh
ok 48 - ... checking InactiveDestory attribute for drh
ok 49 - ... checking AutoInactiveDestory attribute for drh
ok 50 - ... checking PrintError attribute for drh
ok 51 - ... checking PrintWarn attribute for drh
ok 52 - ... checking RaiseError attribute for drh
ok 53 - ... checking ShowErrorStatement attribute for drh
ok 54 - ... checking ChopBlanks attribute for drh
ok 55 - ... checking LongTrunkOk attribute for drh
ok 56 - ... checking TaintIn attribute for drh
ok 57 - ... checking TaintOut attribute for drh
ok 58 - ... checking Taint attribute for drh
ok 59 - ... checking Executed attribute for drh
ok 60 - ... checking Kids attribute for drh
ok 61 - ... checking ActiveKids attribute for drh
ok 62 - ... checking CachedKids attribute for drh
ok 63 - ... checking HandleError attribute for drh
ok 64 - ... checking Profile attribute for drh
ok 65 - ... checking ReadOnly attribute for drh
ok 66 - ... checking TraceLevel attribute for drh
ok 67 - ... checking LongReadLen attribute for drh
ok 68 - ... checking FetchHashKeyName attribute for drh
ok 69
ok 70 - The object isa DBI::st
ok 71 - ... checking Executed attribute for sth
ok 72 - ... checking Executed attribute for dbh
ok 73 - ... checking ErrCount attribute for sth
ok 74 - ... checking exception
ok 75 - ... checking $sth->errstr
ok 76 - ... checking $sth->state
ok 77 - ... checking Executed attribute for sth
ok 78 - ... checking Exceuted attribute for dbh
ok 79 - ... checking ErrCount attribute for sth
ok 80 - ... checking exception
ok 81 - ... checking ErrCount attribute for sth (after assignment)
ok 82 - ... checking ErrCount attribute for sth (after reset)
ok 83 - ... checking Warn attribute for sth
ok 84 - ... checking Active attribute for sth
ok 85 - ... checking CompatMode attribute for sth
ok 86 - ... checking InactiveDestroy attribute for sth
ok 87 - ... checking AutoInactiveDestroy attribute for sth
ok 88 - ... checking PrintError attribute for sth
ok 89 - ... checking PrintWarn attribute for sth
ok 90 - ... checking RaiseError attribute for sth
ok 91 - ... checking ShowErrorStatement attribute for sth
ok 92 - ... checking ChopBlanks attribute for sth
ok 93 - ... checking LongTrunkOk attribute for sth
ok 94 - ... checking TaintIn attribute for sth
ok 95 - ... checking TaintOut attribute for sth
ok 96 - ... checking Taint attribute for sth
ok 97 - ... checking Kids attribute for sth
ok 98 - ... checking ActiveKids attribute for sth
ok 99 - ... checking CachedKids attribute for sth
ok 100 - ... checking HandleError attribute for sth
ok 101 - ... checking Profile attribute for sth
ok 102 - ... checking ReadOnly attribute for sth
ok 103 - ... checking TraceLevel attribute for sth
ok 104 - ... checking LongReadLen attribute for sth
ok 105 - ... checking FetchHashKeyName attribute for sth
ok 106 - ... checking CursorName attribute for sth
ok 107 - ... checking NUM_OF_FIELDS attribute for sth
ok 108 - ... checking NUM_OF_PARAMS attribute for sth
ok 109 - ... checking type of NAME attribute for sth
ok 110 - ... checking number of elements returned
ok 111 - ... checking values returned
ok 112 - ... checking type of NAME_lc attribute for sth
ok 113 - ... checking number of elements returned
ok 114 - ... checking values returned
ok 115 - ... checking type of NAME_uc attribute for sth
ok 116 - ... checking number of elements returned
ok 117 - ... checking values returned
ok 118 - ... checking type of NAME_hash attribute for sth
ok 119 - ... checking number of keys returned
ok 120 - ... checking values returned
ok 121 - ... checking values returned
ok 122 - ... checking type of NAME_lc_hash attribute for sth
ok 123 - ... checking number of keys returned
ok 124 - ... checking values returned
ok 125 - ... checking values returned
ok 126 - ... checking type of NAME_uc_hash attribute for sth
ok 127 - ... checking number of keys returned
ok 128 - ... checking values returned
ok 129 - ... checking values returned
ok 130 - ... checking type of TYPE attribute for sth
ok 131 - ... checking number of elements returned
ok 132 - ... checking values returned
ok 133 - ... checking type of NULLABLE attribute for sth
ok 134 - ... checking number of elements returned
ok 135 - ... checking values returned
ok 136 - ... checking type of PRECISION attribute for sth
ok 137 - ... checking number of elements returned
ok 138 - ... checking values returned
ok 139 - ... checking type of SCALE attribute for sth
ok 140 - ... checking number of elements returned
ok 141 - ... checking values returned
ok 142 - ... checking type of ParamValues attribute for sth
ok 143 - ... checking values returned
ok 144 - ... checking Statement attribute for sth
ok 145 - ... checking type of RowsInCache attribute for sth
ok 146 - should see driver-private sth attribute value
# Checking inheritance
ok 147 # skip drh->dbh->sth inheritance test skipped with DBI_AUTOPROXY
ok 148 # skip drh->dbh->sth inheritance test skipped with DBI_AUTOPROXY
ok
t/zvg_07kids.t .............
1..20
ok 1 - The object isa DBI::db
ok 2 - ... database handle has 0 Kid(s) at start
ok 3 - ... database handle has 0 ActiveKid(s) at start
ok 4 - The object isa DBI::st
ok 5 - ... database handle has 1 Kid(s) after $dbh->prepare
ok 6 - ... database handle has 0 ActiveKid(s) after $dbh->prepare
ok 7 - ... database handle has 1 Kid(s) after $sth->execute
ok 8 - ... database handle has 1 ActiveKid(s) after $sth->execute
ok 9 - ... database handle has 1 Kid(s) after $sth->finish
ok 10 - ... database handle has 0 ActiveKid(s) after $sth->finish
ok 11 - ... database handle has 0 Kid(s) after $sth is destroyed
ok 12 - ... database handle has 0 ActiveKid(s) after $sth is destroyed
ok 13 - The object isa DBI::dr
ok 14 - ... driver handle has 1 Kid(s)
ok 15 - ... driver handle has 1 ActiveKid(s)
ok 16 - ... driver handle has 1 Kid(s) after $dbh->disconnect
ok 17 - ... driver handle has 0 ActiveKid(s) after $dbh->disconnect
ok 18 - ... lets be sure that $dbh is not undefined
ok 19 - ... driver handle has 0 Kid(s) after undef $dbh
ok 20 - ... driver handle has 0 ActiveKid(s) after undef $dbh
ok
t/zvg_08keeperr.t ..........
1..69
ok 1 - use DBI;
ok 2 - ... checking error
ok 3 - ... checking error
Test HandleSetErr
ok 4 - The object isa DBI::db
ok 5 - ... $DBI::err is not defined
HandleSetErr called: h=DBI::db=HASH(0x32daaf8), err=, errstr=(got info), state=
ok 6 - ... $DBI::err is defined
ok 7 - ... $DBI::err is an empty string
ok 8 - ... $DBI::errstr is as we expected
ok 9 - ... $dbh->errstr matches $DBI::errstr
ok 10 - ... $warn{failed} is 0
ok 11 - ... $warn{warning} is 0
ok 12 - ... the @handlewarn array is (1, 0, 0)
HandleSetErr called: h=DBI::db=HASH(0x32daaf8), err=0, errstr=(got warn), state=AA001
warn: 'DBD::Gofer::db set_err warning: (got info)\n(got warn) at ./t/08keeperr.t line 131.\n'
ok 13 - ... $DBI::err is defined
ok 14 - ... $DBI::err is "0"
ok 15 - ... $DBI::errstr is as we expected
ok 16 - ... $dbh->errstr matches $DBI::errstr
ok 17 - ... $DBI::state is AA001
ok 18 - ... $warn{warning} is 1
ok 19 - ... the @handlewarn array is (1, 1, 0)
HandleSetErr called: h=DBI::db=HASH(0x32daaf8), err=, errstr=(got more info), state=
warn: 'DBD::Gofer::db set_err warning: (got info)\n(got warn)\n(got more info) at ./t/08keeperr.t line 146.\n'
ok 20 - ... $DBI::err is defined
ok 21 - ... $DBI::err is "0"
ok 22 - ... $dbh->err is "0"
ok 23 - ... $DBI::state is AA001
ok 24 - ... $DBI::errstr is as we expected
ok 25 - ... $dbh->errstr matches $DBI::errstr
ok 26 - ... $warn{warning} is 2
ok 27 - ... the @handlewarn array is (2, 1, 0)
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error) at ./t/08keeperr.t line 167.\n'
ok 28 - ... $DBI::err is defined
ok 29 - ... $DBI::err is 42
ok 30 - ... $warn{warning} is 2
ok 31 - ... $dbh->errstr is as we expected
ok 32 - ... $DBI::state is AA002
ok 33 - ... the @handlewarn array is (2, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x32daaf8), err=, errstr=(got info), state=
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info) at ./t/08keeperr.t line 179.\n'
ok 34 - ... $DBI::err is defined
ok 35 - ... $DBI::err is 42
ok 36 - ... $warn{warning} is 2
ok 37 - ... $dbh->errstr is as we expected
ok 38 - ... the @handlewarn array is (3, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x32daaf8), err=0, errstr=(got warn), state=
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) at ./t/08keeperr.t line 190.\n'
ok 39 - ... $DBI::err is defined
ok 40 - ... $DBI::err is 42
ok 41 - ... $warn{warning} is 2
ok 42 - ... $dbh->errstr is as we expected
ok 43 - ... the @handlewarn array is (3, 2, 1)
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) [err was 42 now 4200] [state was AA002 now AA003]\n(got new error) at ./t/08keeperr.t line 201.\n'
ok 44 - ... $DBI::err is defined
ok 45 - ... $DBI::err is 4200
ok 46 - ... $warn{warning} is 2
ok 47 - ... $dbh->errstr is as we expected
ok 48 - ... the @handlewarn array is (3, 2, 2)
ok 49 - ... $dbh->errstr is defined
ok 50 - ... $dbh->err is defined
ok 51 - ... $dbh->state is an empty string
warn: 'DBD::Gofer::db set_err failed: foo at ./t/08keeperr.t line 226.\n'
ok 52 - ... only returned one value
ok 53 - ... the first value is undefined
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar at ./t/08keeperr.t line 230.\n'
ok 54 - ... $dbh->set_err returned undefiend
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz at ./t/08keeperr.t line 231.\n'
ok 55 - ... $dbh->set_err returned undefiend
HandleSetErr called: h=DBI::db=HASH(0x32daaf8), err=0, errstr=warn, state=
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz\nwarn at ./t/08keeperr.t line 232.\n'
ok 56 - ... $dbh->set_err returned undefiend
ok 57 - ... $dbh->errstr is as we expected
ok 58 - ... $warn{failed} is 4
ok 59 - ... the @handlewarn array is (0, 1, 3)
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 242.\n'
ok 60 - ... only returned one value
ok 61 - ... the first value is undefined
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 246.\n'
ok 62 - ... only returned one value
ok 63 - ... the first value is "42"
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 250.\n'
ok 64 - ... returned no values
HandleSetErr called: h=DBI::db=HASH(0x32daaf8), err=, errstr=info, state=override
warn: 'DBD::Gofer::db set_err failed: errstr99 at ./t/08keeperr.t line 257.\n'
ok 65 - ... only returned one value
ok 66 - ... the first value is undefined
ok 67 - ... $dbh->err is 99
ok 68 - ... $dbh->errstr is as we expected
ok 69 - ... $dbh->state is as we expected
ok
t/zvg_09trace.t ............
1..67
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - trace file size = 11418
ok 4 - ... checking TraceLevel attribute
ok 5 - ... trace file successfully created
parse_trace_flag SQL
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
parse_trace_flag foo
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
parse_trace_flag bar
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
parse_trace_flag baz
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
parse_trace_flag boo
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
parse_trace_flag bop
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53
parse_trace_flag SQL foo bar baz boo bop
ok 54 - ...
ok 55 - ...
inherit
ok 56 - The object isa DBI::st
ok 57
ok 58
ok 59
test unknown parse_trace_flag
ok 60
ok 61
caught warn: DBI::db=HASH(0x337c810)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\blib\lib/DBI/Gofer/Execute.pm line 329
ok 62
ok 63
caught warn: DBI::db=HASH(0x337e7d0)->parse_trace_flags(nonesuch|SQL|nonesuch2) ignored unknown trace flags: 'nonesuch' 'nonesuch2' at C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\blib\lib/DBI/Gofer/Execute.pm line 329
ok 64
ok 65
ok 66
ok 67
ok
t/zvg_10examp.t ............
1..210
ok 1 - connect should fail
ok 2 - ... we should have an exception here
ok 3 - ... $dbh2 should not be defined
ok 4
ok 5
ok 6 - ... these 2 handles are cached, so they are the same
ok 7
ok 8 - ... this handle was created with different parameters, so it is not the same
ok 9
ok 10 - Executed should be true
ok 11
ok 12 - should return same handle
ok 13 - Executed should be false because reset by connect attributes
ok 14 - The object isa DBI::dr
ok 15 - ... these are our cached kids
ok 16 - ... we have emptied out cache
ok 17
ok 18 - ... PrintError should be 0
ok 19 - ... FetchHashKey is NAME
ok 20 - ... checking the example driver_path
others
ok 21 - DBI commit: invalid number of arguments: got handle + 1, expected handle + between 0 and 0
# Usage: $h->commit() at ./t/10examp.t line 88.
#
ok 22 - ping should return true
ok 23 - prepare should fail
ok 24 - sth->err should be true
ok 25 - DBI::err should be true
ok 26 - $DBI::err should match $dbh->err
ok 27 - $DBI::errstr should contain error string
ok 28 - $DBI::errstr should match $dbh->errstr
ok 29
ok 30
ok 31
ok 32
ok 33 - DBI::db=HASH(0x31df778) ne DBI::db=HASH(0x31df778)
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53 - errstr should contain error message
ok 54
ok 55 - errstr should contain error message
ok 56
ok 57
ok 58 - errstr should contain error message
ok 59
ok 60 - errstr should contain error message
ok 61
ok 62
ok 63
ok 64
ok 65
ok 66
ok 67
ok 68
fetchrow_hashref('NAME_uc')
ok 69
ok 70
ok 71
ok 72
ok 73
fetchrow_hashref('ParamValues')
ok 74
ok 75
FetchHashKeyName
ok 76
ok 77
ok 78
ok 79
ok 80
ok 81
fetchall_arrayref
ok 82
ok 83
ok 84
ok 85
ok 86
ok 87
fetchall_arrayref array slice
ok 88
ok 89
ok 90
ok 91
fetchall_arrayref hash slice
ok 92
ok 93
ok 94
ok 95
fetchall_arrayref hash
ok 96
ok 97
ok 98
ok 99 - '16895 0 .' ne '16895 0 .'
rows()
ok 100 - row count 3
ok 101 - 3 vs 3
ok 102 - 3 vs 3
fetchall_arrayref array slice and max rows
ok 103
ok 104
ok 105
selectrow_array
ok 106
ok 107
selectrow_hashref
ok 108
ok 109
ok 110
ok 111
selectall_arrayref
ok 112
ok 113
ok 114
ok 115
selectall_arrayref Slice array slice
ok 116
ok 117
ok 118 - ". 16895" eq ". 16895"
ok 119
selectall_arrayref Columns array slice
ok 120
ok 121
ok 122 - ". 16895" eq ". 16895"
ok 123
selectall_arrayref hash slice
ok 124
ok 125
ok 126
ok 127
ok 128
ok 129
ok 130
selectall_hashref
ok 131 - selectall_hashref result
ok 132 - selectall_hashref HASH: HASH
ok 133
ok 134 - 0 eq 0
selectall_hashref by column number
ok 135
ok 136 - 0 eq 0
selectcol_arrayref
ok 137
ok 138
ok 139
selectcol_arrayref column slice
ok 140
ok 141
ok 142
ok 143
others...
ok 144
ok 145
RaiseError & PrintError & ShowErrorStatement
ok 146
ok 147
ok 148
ok 149
ok 150
ok 151
ok 152
ok 153
ok 154
ok 155
ok 156
ok 157
ok 158
ok 159
ok 160
ok 161 - DBD::Gofer::st execute failed: 2 values bound when 1 expected; DBD::ExampleP::st execute failed at blib/lib/DBI/Gofer/Execute.pm line 451. [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at ./t/10examp.t line 368.
#
ok 162 - DBD::Gofer::st execute failed: 2 values bound when 1 expected; DBD::ExampleP::st execute failed at blib/lib/DBI/Gofer/Execute.pm line 451. [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at ./t/10examp.t line 368.
#
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168
HandleError
ok 169
ok 170
HandleError -> die
ok 171
ok 172 - HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. [h=DBI::db=HASH(0x31df778), rv=undef, \#=3] at ./t/10examp.t line 397.
#
HandleError -> 0 -> RaiseError
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. [h=DBI::db=HASH(0x31df778), rv=undef, #=3]
ok 173
ok 174 - DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. at ./t/10examp.t line 418.
#
HandleError -> 1 -> return (original)undef
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. [h=DBI::db=HASH(0x31df778), rv=undef, #=3]
ok 175 -
ok 176
HandleError -> 2 -> return (modified)42
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at blib/lib/DBI/Gofer/Execute.pm line 443. [h=DBI::db=HASH(0x31df778), rv=undef, #=3]
ok 177 -
ok 178
ok 179
ok 180 - The object isa DBI::st
ok 181
ok 182
ok 183
ok 184 - Remove dumpcsr.tst
ok 185 - Actually gone
# table_info
ok 186
# Local blib/lib subdirs: DBD auto .. . Bundle Win32 DBI
ok 187
ok 188
ok 189
# tables
ok 190 - Table count mismatch5 vs 5
ok 191 - "schema"."table" ne "schema"."table"
ok 192 - "sch-ema"."table" ne "sch-ema"."table"
ok 193 - "schema"."ta-ble" ne "schema"."ta-ble"
ok 194 - "sch ema"."table" ne "sch ema"."table"
ok 195 - "schema"."ta ble" ne "schema"."ta ble"
# Testing the fake directories (0).
ok 196
ok 197
ok 198 - 0 rows instead of 0
ok 199
# Testing the fake directories (100).
ok 200
ok 201
ok 202 - 100 rows instead of 100
ok 203 - 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
# Testing the fake directories (200).
ok 204
ok 205
ok 206 - 200 rows instead of 200
ok 207 - 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
# Testing $dbh->func().
ok 208
ok 209
ok 210 - ping should return false after disconnect
ok
t/zvg_11fetch.t ............
1..24
# fetchall_hashref(C1)
ok 1
ok 2
ok 3
ok 4
# fetchall_hashref(C2)
ok 5
ok 6
ok 7
ok 8
# fetchall_hashref([C2])
ok 9
ok 10
ok 11
ok 12
# fetchall_hashref([C1 C2])
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok
t/zvg_12quote.t ............
1..10
ok 1 - ... quoting strings with embedded single quotes
ok 2 - ... quoting number as SQL_VARCHAR
ok 3 - ... quoting number as SQL_INTEGER
ok 4 - ... quoting undef as NULL
ok 5 - ... properly quotes foo as "foo"
ok 6 - ... properly quotes f"o as "f""o"
ok 7 - ... properly quotes foo, bar as "foo"."bar"
ok 8 - ... properly quotes undef, undef, bar as "bar"
ok 9 - ... properly quotes foo, undef, bar as "foo"."bar"
ok 10 # skip Can't test alternate quote_identifier logic with DBI_AUTOPROXY
ok
t/zvg_13taint.t ............ skipped: Taint attribute tests not functional with DBI_AUTOPROXY
t/zvg_14utf8.t .............
1..16
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok
t/zvg_15array.t ............
1..55
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - The object isa DBI::st
ok 4 - ... we should have 0 rows
ok 5 - ... execute_array should return false
ok 6 - execute_array failure with RaiseError should have died
ok 7
ok 8 - ... we should have 2 rows
ok 9 - ... we should have 3 tuple_status
ok 10 - ... our rows are as expected
ok 11 - ... our tuple_status is as expected
ok 12 - ... bind_param_array should return true
ok 13 - ... execute_array should return true
ok 14 - ... we should have 3 rows
ok 15 - ... we should have 3 tuple_status
ok 16 - ... our rows are as expected
ok 17 - ... our tuple_status is as expected
ok 18 - ... execute_array should return true
ok 19 - ... we should have executed 3 rows
ok 20 - ... we should have affected 3 rows
ok 21 - ... execute_array should return true
ok 22 - ... execute_array should return 0 (but true)
ok 23 - ... we should have 0 rows
ok 24 - ... we should have 0 tuple_status
ok 25 - ... execute_array should return 1
ok 26 - ... we should have 1 rows
ok 27 - ... our rows are as expected
ok 28 - ... we should have 1 tuple_status
ok 29 - ... our tuple_status is as expected
ok 30 - ... execute_array should return 0
ok 31 - ... we should have 0 rows
ok 32 - ... we should have 0 tuple_status
ok 33 - The object isa DBI::st
ok 34 - ... execute_array should return true
ok 35 - ... execute_array should return 0 (but true)
ok 36 - ... we should have 0 rows
ok 37 - ... execute_array should return true
ok 38 - ... we should have 2 rows
ok 39 - ... we should have 2 tuple_status
ok 40 - ... rows should match
ok 41 - ... tuple_status should match
ok 42 - The object isa DBI::st
ok 43 - ... execute_array should return true
ok 44 - ... we should have 3 rows
ok 45 - ... we should have 3 tuple_status
ok 46 - ... rows should match
ok 47 - ... tuple status should match
ok 48 - ... execute_array should return undef
ok 49 - ... errstr is as expected
ok 50 - ... execute_array should return undef
ok 51 - ... errstr is as expected
ok 52 - ... execute_array should return undef
ok 53 - ... errstr is as expected
ok 54 - ... bind_param_array should return undef
ok 55 - ... errstr is as expected
ok
t/zvg_16destroy.t ..........
1..20
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - Install test driver
ok 5 - Connect to test driver
ok 6 - Should start active
ok 7 - Should be active in DESTROY
ok 8 - Create with ActiveDestroy
ok 9 - InactiveDestroy should be set
ok 10 - Should start active
ok 11 - Should not be active in DESTROY
ok 12 - Create with AutoInactiveDestroy
ok 13 - InactiveDestroy should be set
ok 14 - Should start active
ok 15 - Should be active in DESTROY
ok 16 - Create with AutoInactiveDestroy again
ok 17 - InactiveDestroy should be set
ok 18 - Should start active
ok 19 - Child should be inactive on DESTROY
ok 20 - Should be active in DESTROY
ok
t/zvg_19fhtrace.t ..........
1..27
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking TraceLevel attribute
ok 4 - ... regular fh: trace file successfully created
ok 5 - ... regular fh: filehandle successfully set
ok 6 - ... regular fh: trace_msg
<- trace= 2 at 19fhtrace.t line 201
ok 7 - ... regular fh: file successfully changed
ok 8 - ... regular fh: trace_msg after changing trace output
Next logline
-> trace for DBD::Gofer::db (DBI::db=HASH(0x32c2228)~0x32bff30 0) thr#24ea08
<- trace= 2 at 19fhtrace.t line 214
ok 9 - Tracefile removed
ok 10 - Tracefile FOO opened
ok 11 - Tracefile created
ok 12 - Regression test
ok 13 - Traced message
ok 14 - Regression test
ok 15 - ... layered fh: file is layered: *** Test our layer
#
#
ok 16 - ... layered fh: filehandle successfully set
ok 17 - ... layered fh: trace_msg: Layered logline
#
#
<- trace(1, 'STDOUT')= 1 at 19fhtrace.t line 256
ok 18 - ... layered fh: close doesn't close: Layered logline
#
#
ok 19 - ... layered fh: trace_msg after change trace output: Layered logline
#
#
ok 20 - ... scalar trace: file is layered: *** Test our layer
#
#
ok 21 - ... scalar trace: filehandle successfully set
ok 22 - ... scalar trace: *** Test our layer
# <- trace(1, GLOB(0x2f0e3a8))= 1 at 19fhtrace.t line 272
# Layered logline
#
#
Next logline
<- trace(1, 'STDOUT')= 1 at 19fhtrace.t line 278
ok 23 - ... scalar trace: close doesn't close: *** Test our layer
# <- trace(1, GLOB(0x2f0e3a8))= 1 at 19fhtrace.t line 272
# Layered logline
#
#
ok 24 - ... scalar trace: after change trace output: *** Test our layer
# <- trace(1, GLOB(0x2f0e3a8))= 1 at 19fhtrace.t line 272
# Layered logline
#
#
Next logline
-----> execute_request
<- connect('dummy', '', ...)= DBI::db=HASH(0x3378288) at DBI.pm line 665
<- STORE('RaiseError', 1)= 1 at DBI.pm line 717
<- STORE('PrintError', undef)= 1 at DBI.pm line 717
<- STORE('AutoCommit', 1)= 1 at DBI.pm line 717
<- STORE('PrintWarn', undef)= 1 at DBI.pm line 720
<- FETCH('PrintWarn')= '' at DBI.pm line 720
<- STORE('Username', '')= 1 at DBI.pm line 720
<> FETCH('Username')= '' ('Username' from cache) at DBI.pm line 720
<- STORE('dbi_go_execute_unique', 'DBI::Gofer::Execute|3156|')= 1 at DBI.pm line 720
<> FETCH('dbi_go_execute_unique')= 'DBI::Gofer::Execute|3156|' ('dbi_go_execute_unique' from cache) at DBI.pm line 720
<- STORE('Executed', 0)= 1 at DBI.pm line 720
<- FETCH('Executed')= '' at DBI.pm line 720
<- connected('dbi:ExampleP:dummy', undef, ...)= undef at DBI.pm line 726
<- STORE('dbi_connect_closure', CODE(0x3376e08))= 1 at DBI.pm line 735
<- FETCH('CachedKids')= undef at Execute.pm line 221
<- $DBI::err= undef
<- $DBI::errstr= undef
<- $DBI::state= ''
<- FETCH('Executed')= '' at Execute.pm line 261
<- private_attribute_info= HASH(0x33785e8)1keys at Execute.pm line 413
_std_response_attribute_names for ExampleP dbh: ChopBlanks LongReadLen LongTruncOk ReadOnly Name example_driver_path
<- FETCH_many('ChopBlanks', 'LongReadLen', ...)= ( '' 80 '' undef 'dummy' 'C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\blib\lib/DBD/ExampleP.pm' ) [6 items] at Execute.pm line 372
<> FETCH('ImplementorClass')= 'DBD::ExampleP::db' ('ImplementorClass' from cache) at Execute.pm line 561
<- set_err(undef, undef)= undef at Execute.pm line 234
<- FETCH('Active')= 1 at ExampleP.pm line 260
<- disconnect= 1 at ExampleP.pm line 260
<- DESTROY(DBI::db=HASH(3378210))= undef at Execute.pm line 312
ok 25 - ... logger: trace_msg
#
<----- execute_request
gofer receive_response
DBI::db=HASH(0x32bff30) trace level set to 0x0/1 (DBI @ 0x100/0) in DBI 1.615-ithread (pid 3156)
ok 26 - ... logger: close doesn't close
#
ok 27 - ... logger: trace_msg after change trace output
#
Next logline
<- disconnect= 1 at 19fhtrace.t line 164
<- DESTROY(DBI::db=HASH(32bff30))= undef
ok
t/zvg_20meta.t .............
1..8
ok 1 - use DBI;
ok 2 - use DBI::DBD::Metadata;
ok 3 - The object isa DBI::db
ok 4
ok 5
ok 6
ok 7
ok 8
ok
t/zvg_30subclass.t .........
1..36
ok 1 - use DBI;
ok 2 - The object isa MyDBI::db
ok 3
ok 4 - The object isa MyDBI::db
ok 5
ok 6
ok 7 - The object isa MyDBI::st
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15 - The reference isa ARRAY
ok 16
ok 17
ok 18
ok 19
ok 20 - Clone A isa MyDBI::db
ok 21
ok 22
ok 23 - Clone B isa MyDBI::db
ok 24
ok 25
ok 26 - The object isa MyDBI::db
ok 27
ok 28 - installed method isa ARRAY
ok 29
ok 30
ok 31
ok 32
ok 33 - Failed connect \#1
ok 34
ok 35 - Failed connect \#2
ok 36
fetch 4 prepare 1
ok
t/zvg_35thrclone.t .........
1..20
ok 1 - use DBI;
ok 2 - ... assignment of neat_maxlen was successful
ok 3 - The object isa DBI::db
ok 4 - ... DBI::neat_maxlen still holding its value
ok 5 - The object isa DBI::db
ok 6 - ... new $dbh is not the same instance as $dbh_parent
ok 7 - ... the Driver has one Kid
ok 8 - ... DBI::neat_maxlen still holding its value
ok 9 - The object isa DBI::db
ok 10 - ... new $dbh is not the same instance as $dbh_parent
ok 11 - ... the Driver has one Kid
ok 12 - ... DBI::neat_maxlen still holding its value
ok 13 - The object isa DBI::db
ok 14 - ... new $dbh is not the same instance as $dbh_parent
ok 15 - ... the Driver has one Kid
ok 16 - ... DBI::neat_maxlen still holding its value
ok 17 - The object isa DBI::db
ok 18 - ... new $dbh is not the same instance as $dbh_parent
ok 19 - ... the Driver has one Kid
ok 20 - ... all tests have passed
ok
t/zvg_40profile.t ..........
1..60
Test enabling the profile
ok 1
ok 2
ok 3
ok 4
ok 5
bless( {
'Path' => [
'!MethodName',
'!Caller2'
],
'Data' => {
'do' => {
'40profile.t line 80 via zvg_40profile.t line 4' => [
1,
'0',
'0',
'0',
'0',
'1291172484.47725',
'1291172484.47725'
]
}
}
}, 'DBI::Profile' )
ok 6
ok 7
ok 8
ok 9
ok 10
dbi_profile
bless( {
'Path' => [
'!Statement',
'!MethodName'
],
'Data' => {
'' => {
'connected' => [
1,
'0',
'0',
'0',
'0',
'1291172484.47725',
'1291172484.47725'
],
'FETCH' => [
1,
'0',
'0',
'0',
'0',
'1291172484.47725',
'1291172484.47725'
],
'STORE' => [
5,
'0',
'0',
'0',
'0',
'1291172484.47725',
'1291172484.47725'
]
},
'Hi mom' => {
'my_method_name' => [
1,
'1',
'1',
'1',
'1',
'1291172484.49288',
'1291172484.49288'
]
}
}
}, 'DBI::Profile' )
ok 11
ok 12
ok 13
ok 14 - should return ref to leaf node
ok 15 - should return ref to leaf node
ok 16 - should return ref to correct leaf node
1 1 1 1 1 1291172484.49288 1291172484.49288
ok 17
2 3 1 1 2 1291172484.49288 1291172484.49288
ok 18
Test collected profile data
bless( {
'Path' => [
'!Statement'
],
'Data' => {
'set foo=1' => [
1,
'0',
'0',
'0',
'0',
'1291172484.77413',
'1291172484.77413'
],
'' => [
7,
'0',
'0',
'0',
'0',
'1291172484.49288',
'1291172484.49288'
],
'select mode,size,name from ?' => [
2301,
'0.28125',
'0',
'0',
'0.015625',
'1291172484.49288',
'1291172484.77413'
]
}
}, 'DBI::Profile' )
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
ok 30
ok 31
ok 32
ok 33
ok 34
Test profile format
Profile Output
DBI::Profile: 0.281250s 100.00% (2309 calls) zvg_40profile.t @ 2010-11-30 19:01:24
'' =>
0.000000s / 7 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'select mode,size,name from ?' =>
0.281250s / 2301 = 0.000122s avg (first 0.000000s, min 0.000000s, max 0.015625s)
'set foo=1' =>
0.000000s
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41 - should have 9 nodes
ok 42
testing '!File', '!Caller' and their variants in Path
ok 43
testing '!Time' and variants in Path
ok 44 - !Time and !Time~1000000 should work
testing &norm_std_n3 in Path
ok 45
ok 46 - &norm_std_n3 should normalize statement
testing code ref in Path
ok 47
ok 48
ok 49 - should be vetoed
ok 50 - $_ should contain statement
ok 51 - should have @_ as keys
ok 52 - should be able to filter by method
ok 53 - output should go to log file
testing as_text
ok 54
ok 55
ok 56
DBI::Profile: 2.000000s 200.00% (203 calls) zvg_40profile.t @ 2010-11-30 19:01:25
'A' =>
'Z' =>
1.000000s / 101 = 0.009901s avg (first 2.000000s, min 3.000000s, max 4.000000s)
'B' =>
'Y' =>
1.000000s / 102 = 0.009804s avg (first 2.000000s, min 3.000000s, max 4.000000s)
dbi_profile_merge_nodes
ok 57
ok 58
ok 59
ok 60
DBI::Profile: 0.000000s 0.00% (12 calls) zvg_40profile.t @ 2010-11-30 19:01:25
'foo' =>
'DESTROY' =>
'baz' =>
0.000000s
'FETCH' =>
'baz' =>
0.000000s
'STORE' =>
'baz' =>
0.000000s / 5 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'connected' =>
'baz' =>
0.000000s
'execute' =>
'baz' =>
0.000000s
'fetchrow_hashref' =>
'baz' =>
0.000000s
'finish' =>
'baz' =>
0.000000s
'prepare' =>
'baz' =>
0.000000s
ok
t/zvg_41prof_dump.t ........
1..15
ok 1 - use DBI;
ok 2 - use DBI::ProfileDumper;
ok 3 - The object isa DBI::db
ok 4 - The object isa DBI::ProfileDumper
ok 5 - The reference isa HASH
ok 6 - The reference isa ARRAY
ok 7 - The object isa DBI::st
ok 8
ok 9 - Profile is on disk and nonzero size
DBI::ProfileDumper 2.013956
Path = [ ]
Program = t/zvg_41prof_dump.t
+ 1
= 7 0 0 0 0 1291172485.196 1291172485.196
+ 1 select mode,size,name from ?
= 2 0 0 0 0 1291172485.21163 1291172485.21163
+ 1
= 1 0 0 0 0 1291172485.21163 1291172485.21163
+ 1 select mode,size,name from ?
= 46 0 0 0 0 1291172485.21163 1291172485.21163
ok 10 - Found a version number
ok 11 - Version numbers match in DBI::ProfileDumper 2.013956
#
ok 12 - Found the Path
ok 13 - Found the Program
ok 14
ok 15 # skip developer-only test
ok
t/zvg_42prof_data.t ........
1..31
ok 1 - use DBI::ProfileDumper;
ok 2 - use DBI::ProfileData;
ok 3 - Created connection isa DBI::db
ok 4 - Profile written to disk, non-zero size
ok 5 - The object isa DBI::ProfileData
ok 6 - At least 3 profile data items
ok 7
ok 8
ok 9
ok 10
ok 11 - The object isa DBI::ProfileData
ok 12
ok 13
ok 14 - The object isa DBI::ProfileData
ok 15
ok 16
ok 17
SQL: set dummy=N
SQL:
SQL: select mode,size,name from ?
ok 18 - Data for 'select mode,size,name from ?' should exist
ok 19 - Data for 'select mode,size,name from ?'->{execute} should exist
ok 20
ok 21 - Created connection isa DBI::db
ok 22 - The object isa DBI::st
ok 23 - The object isa DBI::st
ok 24 - The object isa DBI::st
ok 25 - The object isa DBI::st
ok 26 - The object isa DBI::st
ok 27 - The object isa DBI::st
ok 28 - The object isa DBI::ProfileData
ok 29 - file should be deleted when DeleteFiles set
ok 30 - Data for 'select size from . where name = "LITERAL: \r\n"' should exist
ok 31 - Data for 'select size from . where name = "EXPANDED:
# "' should exist
ok
t/zvg_43prof_env.t .........
1..11
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7 - $h->{Profile} should be shared
ok 8
ok 9
ok 10
ok 11
DBI::Profile: 0.031250s 3.13% (130 calls) zvg_43prof_env.t @ 2010-11-30 19:01:27
'' =>
'DESTROY' =>
0.000000s / 3 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'FETCH' =>
0.000000s / 38 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'FETCH_many' =>
0.000000s / 4 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'STORE' =>
0.000000s / 42 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'connect' =>
0.031250s / 6 = 0.005208s avg (first 0.000000s, min 0.000000s, max 0.031250s)
'connected' =>
0.000000s / 6 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'disconnect' =>
0.000000s / 4 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'disconnect_all' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'ping' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'private_attribute_info' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'set_err' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'trace_msg' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'set dummy=1' =>
'DESTROY' =>
0.000000s
'FETCH' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'do' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'private_attribute_info' =>
0.000000s
'set_err' =>
0.000000s
'trace_msg' =>
0.000000s
'set dummy=2' =>
'DESTROY' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'FETCH' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'do' =>
0.000000s / 2 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s)
'private_attribute_info' =>
0.000000s
'set_err' =>
0.000000s
'trace_msg' =>
0.000000s
ok
t/zvg_49dbd_file.t .........
ok 1 - use DBI;
ok 2 - use DBD::File;
ok 3 - Connect clean
ok 4 - Can connect to DBD::File driver
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 5 - f_versions
ok 6 - Connect with DBI attributes
ok 7 - Connect with driver attributes in DSN
ok 8 - Connect with driver attributes in hash
ok 9 - Prepare select from non-existing file
ok 10 - Cannot open non-existing file
# C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5316\t_sbdgf_53442gz.txt
ok 11 - drop manually created table db_5316_2 (first file)
ok 12 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5316\db_5316_2.txt removed
ok 13 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5316\db_5316_2 exists
ok 14 - drop manually created table db_5316_2 (second file)
ok 15 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5316\db_5316_2 removed
ok 16 - Create table db_5316_
ok 17 - Test table exists
ok 18 - get single table meta data
ok 19 - get multiple meta data
ok 20 - encoding shows in layer
ok 21 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 22 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 23 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 24 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 25 - Prepare select * from db_5316_
ok 26 # skip method intrusion didn't work with proxying
ok 27 - Prepare select * from DB_5316_
ok 28 # skip method intrusion didn't work with proxying
ok 29 - table drop
ok 30 - Test table removed
1..30
ok
t/zvg_50dbm_simple.t .......
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable FreezeThaw YAML JSON
--- Using SDBM_File () ---
# DBD::DBM 0.06 using SDBM_File (1.06)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 1 - dbm_versions
ok 2 - The object isa DBI::db
ok 3 # skip Can't set attributes after connect using DBD::Gofer
ok 4 # skip Can't set attributes after connect using DBD::Gofer
ok 5
ok 6 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 7 - execute
ok 8 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 9 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 10 - execute
ok 11 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 12 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 13 - execute
ok 14 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 15 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 16 - execute
ok 17 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 18 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 19 - execute
ok 20 - INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 21 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 22 - execute
ok 23 - INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 24 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 25 - execute
ok 26 - INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 27 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 28 - execute
ok 29 - INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 30 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 31 - execute
ok 32 - INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 33 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 34 - execute
ok 35 - DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
not ok 36 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 37 - prepare UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 38 - execute
ok 39 - UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
not ok 40 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 41 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 42 - execute
ok 43 - DELETE FROM SDBM_File_fruit WHERE dKey=7
not ok 44 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 45 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 46 - execute
ok 47 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 48 - SELECT results
ok 49 - prepare DELETE FROM SDBM_File_fruit
ok 50 - execute
ok 51 - DELETE FROM SDBM_File_fruit
not ok 52 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 53 - prepare DROP TABLE SDBM_File_fruit
ok 54 - execute
ok 55 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Data::Dumper
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 56 - dbm_versions
ok 57 - The object isa DBI::db
ok 58 # skip Can't set attributes after connect using DBD::Gofer
ok 59 # skip Can't set attributes after connect using DBD::Gofer
ok 60
ok 61 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 62 - execute
ok 63 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 64 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 65 - execute
ok 66 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 67 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 68 - execute
ok 69 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 70 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 71 - execute
ok 72 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 73 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 74 - execute
ok 75 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 76 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 77 - execute
ok 78 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 79 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 80 - execute
ok 81 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 82 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 83 - execute
ok 84 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 85 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 86 - execute
ok 87 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 88 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 89 - execute
ok 90 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 91 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 92 - execute
ok 93 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 94 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 95 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 96 - execute
ok 97 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 98 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 99 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 100 - execute
ok 101 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 102 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 103 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 104 - execute
ok 105 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 106 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 107 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 108 - execute
ok 109 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 110 - SELECT results
ok 111 - prepare DELETE FROM SDBM_File_fruit
ok 112 - execute
ok 113 - DELETE FROM SDBM_File_fruit
not ok 114 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 115 - prepare DROP TABLE SDBM_File_fruit
ok 116 - execute
ok 117 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Storable
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 118 - dbm_versions
ok 119 - The object isa DBI::db
ok 120 # skip Can't set attributes after connect using DBD::Gofer
ok 121 # skip Can't set attributes after connect using DBD::Gofer
ok 122
ok 123 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 124 - execute
ok 125 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 126 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 127 - execute
ok 128 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 129 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 130 - execute
ok 131 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 132 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 133 - execute
ok 134 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 135 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 136 - execute
ok 137 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 138 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 139 - execute
ok 140 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 141 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 142 - execute
ok 143 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 144 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 145 - execute
ok 146 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 147 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 148 - execute
ok 149 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 150 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 151 - execute
ok 152 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 153 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 154 - execute
ok 155 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 156 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 157 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 158 - execute
ok 159 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 160 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 161 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 162 - execute
ok 163 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 164 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 165 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 166 - execute
ok 167 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 168 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 169 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 170 - execute
ok 171 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 172 - SELECT results
ok 173 - prepare DELETE FROM SDBM_File_fruit
ok 174 - execute
ok 175 - DELETE FROM SDBM_File_fruit
not ok 176 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 177 - prepare DROP TABLE SDBM_File_fruit
ok 178 - execute
ok 179 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (FreezeThaw) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::FreezeThaw
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 180 - dbm_versions
ok 181 - The object isa DBI::db
ok 182 # skip Can't set attributes after connect using DBD::Gofer
ok 183 # skip Can't set attributes after connect using DBD::Gofer
ok 184
ok 185 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 186 - execute
ok 187 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 188 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 189 - execute
ok 190 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 191 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 192 - execute
ok 193 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 194 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 195 - execute
ok 196 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 197 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 198 - execute
ok 199 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 200 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 201 - execute
ok 202 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 203 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 204 - execute
ok 205 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 206 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 207 - execute
ok 208 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 209 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 210 - execute
ok 211 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 212 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 213 - execute
ok 214 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 215 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 216 - execute
ok 217 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 218 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 219 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 220 - execute
ok 221 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 222 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 223 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 224 - execute
ok 225 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 226 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 227 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 228 - execute
ok 229 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 230 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 231 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 232 - execute
ok 233 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 234 - SELECT results
ok 235 - prepare DELETE FROM SDBM_File_fruit
ok 236 - execute
ok 237 - DELETE FROM SDBM_File_fruit
not ok 238 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 239 - prepare DROP TABLE SDBM_File_fruit
ok 240 - execute
ok 241 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (YAML) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::YAML (0.10)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 242 - dbm_versions
ok 243 - The object isa DBI::db
ok 244 # skip Can't set attributes after connect using DBD::Gofer
ok 245 # skip Can't set attributes after connect using DBD::Gofer
ok 246
ok 247 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 248 - execute
ok 249 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 250 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 251 - execute
ok 252 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 253 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 254 - execute
ok 255 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 256 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 257 - execute
ok 258 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 259 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 260 - execute
ok 261 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 262 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 263 - execute
ok 264 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 265 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 266 - execute
ok 267 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 268 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 269 - execute
ok 270 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 271 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 272 - execute
ok 273 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 274 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 275 - execute
ok 276 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 277 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 278 - execute
ok 279 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 280 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 281 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 282 - execute
ok 283 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 284 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 285 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 286 - execute
ok 287 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 288 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 289 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 290 - execute
ok 291 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 292 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 293 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 294 - execute
ok 295 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 296 - SELECT results
ok 297 - prepare DELETE FROM SDBM_File_fruit
ok 298 - execute
ok 299 - DELETE FROM SDBM_File_fruit
not ok 300 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 301 - prepare DROP TABLE SDBM_File_fruit
ok 302 - execute
ok 303 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (JSON) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::JSON (0.001)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 304 - dbm_versions
ok 305 - The object isa DBI::db
ok 306 # skip Can't set attributes after connect using DBD::Gofer
ok 307 # skip Can't set attributes after connect using DBD::Gofer
ok 308
ok 309 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 310 - execute
ok 311 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 312 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 313 - execute
ok 314 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 315 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 316 - execute
ok 317 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 318 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 319 - execute
ok 320 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 321 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 322 - execute
ok 323 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 324 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 325 - execute
ok 326 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 327 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 328 - execute
ok 329 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 330 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 331 - execute
ok 332 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 333 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 334 - execute
ok 335 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 336 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 337 - execute
ok 338 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 339 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 340 - execute
ok 341 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 342 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 343 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 344 - execute
ok 345 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 346 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 347 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 348 - execute
ok 349 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 350 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 351 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 352 - execute
ok 353 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 354 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 355 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 356 - execute
ok 357 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 358 - SELECT results
ok 359 - prepare DELETE FROM SDBM_File_fruit
ok 360 - execute
ok 361 - DELETE FROM SDBM_File_fruit
not ok 362 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 363 - prepare DROP TABLE SDBM_File_fruit
ok 364 - execute
ok 365 - DROP TABLE SDBM_File_fruit
1..365
ok
t/zvg_51dbm_file.t .........
ok 1 - drop table
ok 2 - FRED.dir exists
ok 3 - fred.dir exists
ok 4 - insert into mixed case table
ok 5 - insert into uppercase table
ok 6 - rows found via mixed case table
ok 7 # skip quoted identifiers aren't supported by DBI::SQL::Nano
ok 8 - drop table
1..8
ok
t/zvg_52dbm_complex.t ...... skipped: Not running with SQL::Statement
t/zvg_60preparse.t .........
1..39
ok 1 - The object isa DBI::db
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38
ok 39
ok
t/zvg_65transact.t ......... skipped: Transactions not supported by DBD::Gofer
t/zvg_70callbacks.t ........
1..63
ok 1 - Create dbh
ok 2 - Callbacks initially undef
ok 3
ok 4 - Callbacks can be set to a hash ref
ok 5 - Callbacks set to same hash ref
ok 6 - Callbacks set to undef again
ok 7
ok 8
ok 9
ok 10 - $_ holds method name
ok 11 - @_ holds 1 values
ok 12 - first is $dbh
ok 13
ok 14
ok 15 - $_ not altered by callback
ok 16 - $_ holds method name
ok 17 - @_ holds 1 values
ok 18 - first is $dbh
ok 19
ok 20
ok 21
ok 22 - fallback callback
ok 23 - @_ holds 4 values
ok 24 - first is $dbh
ok 25
ok 26
ok 27
ok 28
ok 29 - quote_identifier callback caused fatal error
ok 30 - param modified by callback - not recommended!
ok 31
ok 32 - You can't disconnect that easily!
#
ok 33
ok 34
ok 35
ok 36 - should return a single value in list context
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42 - intercepted commit should return undef
ok 43
ok 44
ok 45
ok 46 - Create handle with callbacks
ok 47 - no callback for plain connect
ok 48 - Create handle with callbacks
ok 49 - connect_cached.new called
ok 50 - connect_cached.reused not yet called
ok 51 - Create handle with callbacks
ok 52 - connect_cached.reused called
ok 53 - connect_cached.new not called again
ok 54 - Create handle with ChildCallbacks
ok 55 - Ping
ok 56 - Ping callback should have been called
ok 57 - Prepare a statement handle (child)
ok 58 - child should have Callbacks
ok 59 - child Callbacks should be ChildCallbacks of parent
ok 60 - Execute
ok 61 - Execute callback should have been called
ok 62 - Fetch
ok 63 - Fetch callback should have been called
ok
t/zvg_72childhandles.t .....
1..16
ok 1
ok 2
ok 3
ok 4
ok 5 - All handles should be undef now
ok 6 - ChildHandles should be an array-ref if wekref is available
ok 7
drh DBI::dr=HASH(0x2fb6f90)
dbh DBI::db=HASH(0x3362b50)
sth DBI::st=HASH(0x32c6318)
sth DBI::st=HASH(0x26a268)
sth DBI::st=HASH(0x3362970)
ok 8
ok 9
ok 10
ok 11
ok 12 - handles should be gone now
ok 13
ok 14
ok 15 # skip slow tests avoided when using DBD::Gofer
ok 16 # skip slow tests avoided when using DBD::Gofer
ok
t/zvg_80proxy.t ............ skipped: modules required for proxy are probably not installed (e.g., RPC/PlClient.pm)
t/zvg_85gofer.t ............
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_2392;dbm_type=SDBM_File;f_lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_2392;dbm_type=SDBM_File;f_lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x4df22b8)
ok 20 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 21 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 22 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_2392;dbm_type=SDBM_File;f_lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_2392;dbm_type=SDBM_File;f_lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x4e03228)
ok 46 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 47 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 48 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_2392;dbm_type=SDBM_File;f_lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_2392;dbm_type=SDBM_File;f_lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x4e08f70)
ok 72 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 73 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 74 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
1..78
ok
t/zvg_86gofer_fail.t ....... skipped: Gofer DBI_AUTOPROXY
t/zvg_87gofer_cache.t ...... skipped: Gofer DBI_AUTOPROXY
t/zvg_90sql_type_cast.t ....
1..36
ok 1 - result, undef
ok 2 - json undef
ok 3 - result, invalid sql type
ok 4 - json invalid sql type
ok 5 - result, non numeric cast to int
ok 6 - json non numeric cast to int
ok 7 - result, non numeric cast to int (strict)
ok 8 - json non numeric cast to int (strict)
ok 9 - result, small int cast to int
ok 10 - json small int cast to int
ok 11 - result, 2 byte max signed int cast to int
ok 12 - json 2 byte max signed int cast to int
ok 13 - result, 2 byte max unsigned int cast to int
ok 14 - json 2 byte max unsigned int cast to int
ok 15 - result, 4 byte max signed int cast to int
ok 16 - json 4 byte max signed int cast to int
ok 17 - result, 4 byte max unsigned int cast to int
ok 18 - json 4 byte max unsigned int cast to int
ok 19 - result, small int cast to int (discard)
ok 20 - json small int cast to int (discard)
ok 21 - result, non numeric cast to numeric
ok 22 - json non numeric cast to numeric
ok 23 - result, non numeric cast to numeric (strict)
ok 24 - json non numeric cast to numeric (strict)
ok 25 - result, very large int cast to int
ok 26 - json very large int cast to int
ok 27 - result, very large int cast to int (strict)
ok 28 - json very large int cast to int (strict)
ok 29 - result, float cast to int
ok 30 - json float cast to int
ok 31 - result, float cast to int (strict)
ok 32 - json float cast to int (strict)
ok 33 - result, float cast to double
ok 34 - json float cast to double
ok 35 - result, 4 byte max unsigned int cast to int (ivsize>8)
ok 36 - json 4 byte max unsigned int cast to int (ivsize>8)
ok
t/zvn_49dbd_file.t .........
ok 1 - use DBI;
ok 2 - use DBD::File;
ok 3 - Connect clean
ok 4 - Can connect to DBD::File driver
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 5 - f_versions
ok 6 - Connect with DBI attributes
ok 7 - Connect with driver attributes in DSN
ok 8 - Connect with driver attributes in hash
ok 9 - Prepare select from non-existing file
ok 10 - Cannot open non-existing file
# C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5444\t_sbdgf_53442gz.txt
ok 11 - drop manually created table db_5444_2 (first file)
ok 12 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5444\db_5444_2.txt removed
ok 13 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5444\db_5444_2 exists
ok 14 - drop manually created table db_5444_2 (second file)
ok 15 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5444\db_5444_2 removed
ok 16 - Create table db_5444_
ok 17 - Test table exists
ok 18 - get single table meta data
ok 19 - get multiple meta data
ok 20 - encoding shows in layer
ok 21 - set single meta datum
ok 22 - verify set single meta datum
ok 23 - set multiple meta data
ok 24 - verify set multiple meta attributes
ok 25 - Prepare select * from db_5444_
ok 26 - execute on db_5444_
ok 27 - Prepare select * from DB_5444_
ok 28 - execute on DB_5444_
ok 29 - table drop
ok 30 - Test table removed
1..30
ok
t/zvn_50dbm_simple.t .......
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable FreezeThaw YAML JSON
--- Using SDBM_File () ---
# DBD::DBM 0.06 using SDBM_File (1.06)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 1 - dbm_versions
ok 2 - The object isa DBI::db
ok 3
ok 4
ok 5
ok 6 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 7 - execute
ok 8 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 9 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 10 - execute
ok 11 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 12 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 13 - execute
ok 14 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 15 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 16 - execute
ok 17 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 18 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 19 - execute
ok 20 - INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 21 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 22 - execute
ok 23 - INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 24 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 25 - execute
ok 26 - INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 27 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 28 - execute
ok 29 - INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 30 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 31 - execute
ok 32 - INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 33 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 34 - execute
ok 35 - DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 36 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows
ok 37 - prepare UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 38 - execute
ok 39 - UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 40 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows
ok 41 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 42 - execute
ok 43 - DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 44 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows
ok 45 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 46 - execute
ok 47 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 48 - SELECT results
ok 49 - prepare DELETE FROM SDBM_File_fruit
ok 50 - execute
ok 51 - DELETE FROM SDBM_File_fruit
ok 52 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 53 - prepare DROP TABLE SDBM_File_fruit
ok 54 - execute
ok 55 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Data::Dumper
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 56 - dbm_versions
ok 57 - The object isa DBI::db
ok 58
ok 59
ok 60
ok 61 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 62 - execute
ok 63 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 64 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 65 - execute
ok 66 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 67 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 68 - execute
ok 69 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 70 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 71 - execute
ok 72 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 73 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 74 - execute
ok 75 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 76 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 77 - execute
ok 78 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 79 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 80 - execute
ok 81 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 82 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 83 - execute
ok 84 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 85 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 86 - execute
ok 87 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 88 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 89 - execute
ok 90 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 91 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 92 - execute
ok 93 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 94 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 95 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 96 - execute
ok 97 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 98 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 99 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 100 - execute
ok 101 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 102 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 103 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 104 - execute
ok 105 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 106 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 107 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 108 - execute
ok 109 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 110 - SELECT results
ok 111 - prepare DELETE FROM SDBM_File_fruit
ok 112 - execute
ok 113 - DELETE FROM SDBM_File_fruit
ok 114 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 115 - prepare DROP TABLE SDBM_File_fruit
ok 116 - execute
ok 117 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Storable
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 118 - dbm_versions
ok 119 - The object isa DBI::db
ok 120
ok 121
ok 122
ok 123 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 124 - execute
ok 125 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 126 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 127 - execute
ok 128 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 129 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 130 - execute
ok 131 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 132 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 133 - execute
ok 134 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 135 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 136 - execute
ok 137 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 138 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 139 - execute
ok 140 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 141 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 142 - execute
ok 143 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 144 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 145 - execute
ok 146 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 147 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 148 - execute
ok 149 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 150 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 151 - execute
ok 152 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 153 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 154 - execute
ok 155 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 156 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 157 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 158 - execute
ok 159 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 160 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 161 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 162 - execute
ok 163 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 164 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 165 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 166 - execute
ok 167 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 168 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 169 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 170 - execute
ok 171 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 172 - SELECT results
ok 173 - prepare DELETE FROM SDBM_File_fruit
ok 174 - execute
ok 175 - DELETE FROM SDBM_File_fruit
ok 176 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 177 - prepare DROP TABLE SDBM_File_fruit
ok 178 - execute
ok 179 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (FreezeThaw) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::FreezeThaw
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 180 - dbm_versions
ok 181 - The object isa DBI::db
ok 182
ok 183
ok 184
ok 185 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 186 - execute
ok 187 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 188 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 189 - execute
ok 190 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 191 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 192 - execute
ok 193 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 194 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 195 - execute
ok 196 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 197 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 198 - execute
ok 199 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 200 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 201 - execute
ok 202 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 203 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 204 - execute
ok 205 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 206 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 207 - execute
ok 208 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 209 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 210 - execute
ok 211 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 212 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 213 - execute
ok 214 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 215 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 216 - execute
ok 217 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 218 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 219 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 220 - execute
ok 221 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 222 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 223 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 224 - execute
ok 225 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 226 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 227 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 228 - execute
ok 229 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 230 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 231 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 232 - execute
ok 233 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 234 - SELECT results
ok 235 - prepare DELETE FROM SDBM_File_fruit
ok 236 - execute
ok 237 - DELETE FROM SDBM_File_fruit
ok 238 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 239 - prepare DROP TABLE SDBM_File_fruit
ok 240 - execute
ok 241 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (YAML) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::YAML (0.10)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 242 - dbm_versions
ok 243 - The object isa DBI::db
ok 244
ok 245
ok 246
ok 247 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 248 - execute
ok 249 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 250 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 251 - execute
ok 252 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 253 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 254 - execute
ok 255 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 256 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 257 - execute
ok 258 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 259 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 260 - execute
ok 261 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 262 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 263 - execute
ok 264 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 265 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 266 - execute
ok 267 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 268 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 269 - execute
ok 270 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 271 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 272 - execute
ok 273 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 274 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 275 - execute
ok 276 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 277 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 278 - execute
ok 279 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 280 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 281 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 282 - execute
ok 283 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 284 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 285 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 286 - execute
ok 287 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 288 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 289 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 290 - execute
ok 291 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 292 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 293 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 294 - execute
ok 295 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 296 - SELECT results
ok 297 - prepare DELETE FROM SDBM_File_fruit
ok 298 - execute
ok 299 - DELETE FROM SDBM_File_fruit
ok 300 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 301 - prepare DROP TABLE SDBM_File_fruit
ok 302 - execute
ok 303 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (JSON) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::JSON (0.001)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 304 - dbm_versions
ok 305 - The object isa DBI::db
ok 306
ok 307
ok 308
ok 309 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 310 - execute
ok 311 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 312 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 313 - execute
ok 314 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 315 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 316 - execute
ok 317 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 318 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 319 - execute
ok 320 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 321 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 322 - execute
ok 323 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 324 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 325 - execute
ok 326 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 327 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 328 - execute
ok 329 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 330 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 331 - execute
ok 332 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 333 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 334 - execute
ok 335 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 336 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 337 - execute
ok 338 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 339 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 340 - execute
ok 341 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 342 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 343 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 344 - execute
ok 345 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 346 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 347 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 348 - execute
ok 349 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 350 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 351 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 352 - execute
ok 353 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 354 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 355 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 356 - execute
ok 357 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 358 - SELECT results
ok 359 - prepare DELETE FROM SDBM_File_fruit
ok 360 - execute
ok 361 - DELETE FROM SDBM_File_fruit
ok 362 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 363 - prepare DROP TABLE SDBM_File_fruit
ok 364 - execute
ok 365 - DROP TABLE SDBM_File_fruit
1..365
ok
t/zvn_51dbm_file.t .........
ok 1 - drop table
ok 2 - FRED.dir exists
ok 3 - fred.dir exists
ok 4 - insert into mixed case table
ok 5 - insert into uppercase table
ok 6 - rows found via cloned mixed case table
ok 7 - drop table
ok 8 - rows found via mixed case table
ok 9 # skip quoted identifiers aren't supported by DBI::SQL::Nano
ok 10 - drop table
1..10
ok
t/zvn_52dbm_complex.t ...... skipped: Not running with SQL::Statement
t/zvn_85gofer.t ............
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4500;dbm_type=SDBM_File;f_lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4500;dbm_type=SDBM_File;f_lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x388d638)
ok 20
ok 21
ok 22
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4500;dbm_type=SDBM_File;f_lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4500;dbm_type=SDBM_File;f_lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x38068b8)
ok 46
ok 47
ok 48
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4500;dbm_type=SDBM_File;f_lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4500;dbm_type=SDBM_File;f_lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x38991a0)
ok 72
ok 73
ok 74
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
1..78
ok
t/zvp_01basics.t ...........
1..130
ok 1 - use DBI;
ok 2 - ... testing sql_type
ok 3 - ... testing sql_type
ok 4 - ... testing sql_type
ok 5 - ... testing sql_type
ok 6 - ... testing sql_type
ok 7 - ... testing sql_type
ok 8 - ... testing sql_type
ok 9 - ... testing sql_type
ok 10 - ... testing sql_type
ok 11 - ... testing sql_type
ok 12 - ... testing sql_type
ok 13 - ... testing sql_type
ok 14 - ... testing sql_type
ok 15 - ... testing sql_type
ok 16 - ... testing sql_type
ok 17 - ... testing sql_type
ok 18 - ... testing sql_type
ok 19 - ... testing sql_type
ok 20 - ... testing sql_type
ok 21 - ... testing sql_type
ok 22 - ... testing sql_type
ok 23 - ... testing sql_type
ok 24 - ... testing sql_type
ok 25 - ... testing sql_type
ok 26 - ... testing sql_type
ok 27 - ... testing sql_type
ok 28 - ... testing sql_type
ok 29 - ... testing sql_type
ok 30 - ... testing sql_type
ok 31 - ... testing sql_type
ok 32 - ... testing sql_type
ok 33 - ... testing sql_type
ok 34 - ... testing sql_type
ok 35 - ... testing sql_type
ok 36 - ... testing sql_type
ok 37 - ... testing sql_type
ok 38 - ... testing sql_type
ok 39 - ... testing sql_type
ok 40 - ... testing sql_type
ok 41 - ... testing sql_type
ok 42 - ... testing sql_type
ok 43 - ... testing sql_type
ok 44 - ... testing sql_type
ok 45 - ... testing sql_type
ok 46 - ... testing sql_type
ok 47 - ... testing sql_type
ok 48 - ... testing sql_type
ok 49 - ... testing sql_type
ok 50 - ... testing sql_type
ok 51 - ... testing sql_type
ok 52 - ... testing sql_type
ok 53 - ... testing sql_type
ok 54 - ... testing sql_type
ok 55 - ... testing sql_type
ok 56 - ... testing sql_type
ok 57 - ... testing sql_type
ok 58 - ... testing sql_type
ok 59 - ... testing sql_type
ok 60 - ... testing sql_cursor_types
ok 61 - ... testing sql_cursor_types
ok 62 - ... testing sql_cursor_types
ok 63 - ... testing sql_cursor_types
ok 64 - ... testing sql_cursor_types
ok 65 - ... looks_like_number : undef -> undef
ok 66 - ... looks_like_number : "" -> undef (eg "don't know")
ok 67 - ... looks_like_number : "foo" -> defined false
ok 68 - ... looks_like_number : "foo" -> defined false
ok 69 - ... looks_like_number : 1 -> true
ok 70 - ... looks_like_number : "." -> false
ok 71 - ... looks_like_number : 1 -> true
ok 72 - ... looks_like_number : 1 -> true
ok 73 - ... 1000 initial state is 400
ok 74 - ... neat : 1 + 1 -> "2"
ok 75 - ... neat : 2 -> "'2'"
ok 76 - ... neat : undef -> "undef"
ok 77 - ... test array argument w/seperator and maxlen
ok 78 - ... test array argument w/out seperator or maxlen
ok 79 - The object isa DBI::dr
ok 80 - ... test debug
ok 81 - ... test DebugDispatch
ok 82 - ... test Warn
ok 83 - ... this should say Tim Bunce
ok 84 - ... the version should match DBI version
ok 85 - ... this should work and return 1
ok 86 - ... this should equal 1
ok 87 - ... CachedKids should be undef initially
ok 88 - ... CachedKids should be our ref
ok 89 - ... this should be zero
ok 90 - ... this should be zero
ok 91 - ... Active flag is true
ok 92 - ... we should get a warning here
ok 93 - ... we should get a warning here
ok 94 - ... we should get no warnings here
ok 95 - ... we at least have one driver installed
ok 96 - ... we should at least have ExampleP installed
ok 97 - ... we should at least have one driver
ok 98 - ... should be -1077531989
ok 99 - ... should be -1077531989
ok 100 - ... should be -1077531990
ok 101 # skip Seems like your Math::BigInt 1.89 has a bug
ok 102 # skip Seems like your Math::BigInt 1.89 has a bug
ok 103
ok 104
ok 105
ok 106
ok 107
ok 108
ok 109
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116
ok 117
ok 118
ok 119
ok 120
ok 121
ok 122
ok 123
ok 124 # skip developer tests
ok 125 # skip developer tests
ok 126 # skip developer tests
ok 127 # skip developer tests
ok 128 - ... DBI::dbi_debug's initial state is 0
ok 129 - ... DBI::dbi_debug is 15
ok 130 - ... DBI::dbi_debug is 0
ok
t/zvp_02dbidrv.t ...........
1..53
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - ... DBD::Test->driver called to getnew Driver handle
ok 5 - ... new Driver handle (DBI::dr=HASH(0x2d3be60)) created successfully
ok 6 - The object isa DBI::dr
ok 7 - ... got a Test Driver object back from DBI->install_driver
ok 8 - The object isa DBI::dr
ok 9 - ... checking the DBI::_get_imp_data function
ok 10 - ... Driver object passed to data_sources
ok 11 - The object isa DBI::dr
ok 12 - ... Driver object is not tied
ok 13 - ... got correct datasources from DBI->data_sources("Test")
ok 14 # skip Kids attribute not supported under DBI::PurePerl
ok 15 - ... got a database handle from calling $drh->connect
ok 16 - The object isa DBI::db
ok 17 # skip Kids attribute not supported under DBI::PurePerl
ok 18 - ... Driver object passed to data_sources
ok 19 - The object isa DBI::dr
ok 20 - ... Driver object is not tied
ok 21 - ... checking fetched datasources from Driver
ok 22 - ... got correct datasources from $dbh->data_sources()
ok 23 - ... Database object passed to do
ok 24 - The object isa DBI::db
ok 25 - ... Database object is not tied
ok 26 - ... got Driver object from Database object with Driver attribute
ok 27 - The object isa DBI::dr
ok 28 - ... Driver object is not tied
ok 29 - ... got Driver object from Database object by FETCH-ing Driver attribute
ok 30 - The object isa DBI::dr
ok 31 # skip running DBI::PurePerl
ok 32 - ... this will trigger more driver internal tests above in DBD::Test::db
ok 33 - ... checking Driver handle err set with set_err method
ok 34 - ... checking Database handle err set with set_err method
ok 35 - ... checking Database handle err set with Driver handle set_err method
ok 36 # skip Kids attribute not supported under DBI::PurePerl
ok 37 - ... $dbh->DESTROY should set $drh->err to 42
ok 38 - ... checking $DBI::err set with Driver handle set_err method
ok 39 - ... checking $DBI::errstr
ok 40 - ... checking $DBI::state
ok 41 - ... checking $DBI::state
ok 42 - ... checking $DBI::state
ok 43 # skip using DBI::PurePerl
ok 44 - ... FetchHashKeyName is NAME
ok 45 - ... FetchHashKeyName is now changed to NAME_lc
ok 46 - ... calling $drh->disconnect_all (not implemented but will fail silently)
ok 47 - has dbixs_revision
ok 48 - has integer dbixs_revision
ok 49 # skip using DBI::PurePerl
ok 50 # skip using DBI::PurePerl
ok 51 # skip using DBI::PurePerl
ok 52 # skip using DBI::PurePerl
ok 53 # skip using DBI::PurePerl
ok
t/zvp_03handle.t ...........
1..137
ok 1 - use DBI;
ok 2
ok 3 - The object isa DBI::dr
ok 4 # skip Kids attribute not supported under DBI::PurePerl
ok 5
ok 6
ok 7
ok 8 - The object isa DBI::db
ok 9 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 10 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 11 - The object isa DBI::st
ok 12 - ... execute ran successfully
ok 13 - ... we got the CachedKids hash
ok 14 - ... there is one CachedKid
ok 15 - ... our statment handle should be in the CachedKids
ok 16 - ... our first statment is Active
ok 17 - The object isa DBI::st
ok 18 - ... prepare_cached returned the same statement handle
ok 19 - ... we got warned about our first statement handle being still active
ok 20 - ... our first statment is no longer Active since we re-prepared it
ok 21 - The object isa DBI::st
ok 22 - ... prepare_cached returned a different statement handle now
ok 23 - ... there are two CachedKids
ok 24 - ... both statment handles should be in the CachedKids
ok 25 - ... executing first statement handle again
ok 26 - ... first statement handle is now active again
ok 27 - The object isa DBI::st
ok 28 - ... our fourth statement handle is not the same as our first
ok 29 - ... first statement handle is still active
ok 30 - ... there are two CachedKids
ok 31 - ... second and fourth statment handles should be in the CachedKids
ok 32 - ... first statement handle is no longer active
ok 33 - ... fourth statement handle executed properly
ok 34 - ... fourth statement handle is Active
ok 35 - The object isa DBI::st
ok 36 - ... we still only got one warning
ok 37 - ... fourth statement handle and fifth one match
ok 38 - ... fourth statement handle is not Active
ok 39 - ... fifth statement handle is not Active (shouldnt be its the same as fifth)
ok 40 - ... there are two CachedKids
ok 41 - ... second and fourth/fifth statment handles should be in the CachedKids
ok 42 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 43 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 44 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 45 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 46 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 47 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 48 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 49 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 50 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 51 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 52 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 53 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 54 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 55 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 56 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 57 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 58 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 59 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 60 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 61 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 62 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 63 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 64 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 65 - ping should be true before disconnect
ok 66 - ping should be false after disconnect
ok 67 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 68 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 69 # skip Kids attribute not supported under DBI::PurePerl
ok 70 # skip Kids attribute not supported under DBI::PurePerl
ok 71 # skip Kids attribute not supported under DBI::PurePerl
ok 72 # skip Kids attribute not supported under DBI::PurePerl
ok 73 # skip Kids attribute not supported under DBI::PurePerl
ok 74 # skip Kids attribute not supported under DBI::PurePerl
ok 75 # skip Kids attribute not supported under DBI::PurePerl
ok 76 # skip Kids attribute not supported under DBI::PurePerl
ok 77 # skip Kids attribute not supported under DBI::PurePerl
ok 78 # skip Kids attribute not supported under DBI::PurePerl
ok 79 # skip Kids attribute not supported under DBI::PurePerl
ok 80 # skip Kids attribute not supported under DBI::PurePerl
ok 81 # skip Kids attribute not supported under DBI::PurePerl
ok 82 # skip Kids attribute not supported under DBI::PurePerl
ok 83 # skip Kids attribute not supported under DBI::PurePerl
ok 84 # skip Kids attribute not supported under DBI::PurePerl
ok 85 # skip Kids attribute not supported under DBI::PurePerl
ok 86 # skip Kids attribute not supported under DBI::PurePerl
ok 87 # skip Kids attribute not supported under DBI::PurePerl
ok 88 # skip Kids attribute not supported under DBI::PurePerl
ok 89 # skip Kids attribute not supported under DBI::PurePerl
ok 90 # skip Kids attribute not supported under DBI::PurePerl
ok 91 # skip Kids attribute not supported under DBI::PurePerl
ok 92 # skip Kids attribute not supported under DBI::PurePerl
ok 93 # skip Kids attribute not supported under DBI::PurePerl
ok 94 # skip Kids attribute not supported under DBI::PurePerl
ok 95 - The object isa DBI::db
ok 96
ok 97
ok 98
ok 99 - we need weakrefs for take_imp_data to work safely with child handles
ok 100 - should have 3 entries (implementation detail)
ok 101 - should have 2 defined handles
ok 102 - ... we got some imp_data to test
ok 103 - ... test that our imp_data is greater than or equal to 80, this is reasonable
ok 104 - ... our Driver should have 0 Kid(s) after calling take_imp_data
ok 105 - sth should be reblessed
ok 106
warn: Can't call FETCH method on handle DBI::db=HASH(0x37915f0) after take_imp_data()
ok 107 - ... our Driver should be undefined
warn: Can't call FETCH method on handle DBI::db=HASH(0x37915f0) after take_imp_data()
ok 108 - ... our TraceLevel should be undefined
warn: Can't call disconnect method on handle DBI::db=HASH(0x37915f0) after take_imp_data()
ok 109 - ... disconnect should return undef
warn: Can't call quote method on handle DBI::db=HASH(0x37915f0) after take_imp_data()
ok 110 - ... quote should return undefined
ok 111 - ... we should have gotten 4 warnings
ok 112 - The object isa DBI::db
ok 113
ok 114 # skip Kids attribute not supported under DBI::PurePerl
ok 115 - The object isa DBI::dr
ok 116 # skip Kids attribute not supported under DBI::PurePerl
ok 117 - The object isa DBI::db
ok 118 - The object isa DBI::st
ok 119 - ... NUM_OF_PARAMS is 0
ok 120 - ... NUM_OF_FIELDS should be undef
ok 121 - ... Statement is "foo bar"
ok 122 - ... NAME is undefined
ok 123 - ... TYPE is undefined
ok 124 - ... SCALE is undefined
ok 125 - ... PRECISION is undefined
ok 126 - ... NULLABLE is undefined
ok 127 - ... RowsInCache is undefined
ok 128 - ... ParamValues is undefined
ok 129 - ... NAME_uc is undefined
ok 130 - ... NAME_lc is undefined
ok 131 - ... NAME_hash is undefined
ok 132 - ... NAME_uc_hash is undefined
ok 133 - ... NAME_lc_hash is undefined
ok 134 - ... $dbh can call "prepare"
ok 135 - ... $dbh cannot call "nonesuch"
ok 136 - ... $sth can call "execute"
ok 137 # skip Kids attribute not supported under DBI::PurePerl
ok
t/zvp_04mods.t .............
1..12
ok 1 - use DBI;
ok 2 - use DBI::Const::GetInfo::ANSI;
ok 3 - use DBI::Const::GetInfo::ODBC;
ok 4 - use DBI::Const::GetInfoType;
ok 5 - use DBI::Const::GetInfoReturn;
ok 6 - ... we have at least one key in the GetInfoType hash
ok 7 - ... the GetInfoType hash is constructed from the ANSI and ODBC hashes
ok 8 - ... we have at least one key in the GetInfoReturnType hash
ok 9 - ... the GetInfoReturnType hash is constructed from the ANSI and ODBC hashes
ok 10 - ... we have at least one key in the GetInfoReturnValues hash
ok 11 - DBI::Const::GetInfoReturn->can('Format')
ok 12 - DBI::Const::GetInfoReturn->can('Explain')
ok
t/zvp_05concathash.t .......
1..41
ok 1 - use DBI;
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9 - should work with nul bytes in kv_sep and pair_sep
ok 10 - should work with nul bytes in hash value (neat)
ok 11 - should work with nul bytes in hash value (not neat)
ok 12
ok 13
ok 14
ok 15 - test
ok 16 - test
ok 17 - Unknown sort order
ok 18 - Float Hash - Not Neat lexical
ok 19 - Numeric - Not Neat lexical
ok 20 - Mixed Hash - Not Neat lexical
ok 21 - Simple Hash - Not Neat lexical
ok 22 - Float Hash - Neat lexical
ok 23 - Numeric - Neat lexical
ok 24 - Mixed Hash - Neat lexical
ok 25 - Simple Hash - Neat lexical
ok 26 - Float Hash - Not Neat guess
ok 27 - Numeric - Not Neat guess
ok 28 - Mixed Hash - Not Neat guess
ok 29 - Simple Hash - Not Neat guess
ok 30 - Float Hash - Neat guess
ok 31 - Numeric - Neat guess
ok 32 - Mixed Hash - Neat guess
ok 33 - Simple Hash - Neat guess
ok 34 - Float Hash - Not Neat numeric
ok 35 - Numeric - Not Neat numeric
ok 36 - Mixed Hash - Not Neat numeric
ok 37 - Simple Hash - Not Neat numeric
ok 38 - Float Hash - Neat numeric
ok 39 - Numeric - Neat numeric
ok 40 - Mixed Hash - Neat numeric
ok 41 - Simple Hash - Neat numeric
ok
t/zvp_06attrs.t ............
1..148
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking Warn attribute for dbh
ok 4 - ... checking Active attribute for dbh
ok 5 - ... checking AutoCommit attribute for dbh
ok 6 - ... checking CompatMode attribute for dbh
ok 7 - ... checking InactiveDestory attribute for dbh
ok 8 - ... checking AutoInactiveDestory attribute for dbh
ok 9 - ... checking PrintError attribute for dbh
ok 10 - ... checking PrintWarn attribute for dbh
ok 11 - ... checking RaiseError attribute for dbh
ok 12 - ... checking ShowErrorStatement attribute for dbh
ok 13 - ... checking ChopBlanks attribute for dbh
ok 14 - ... checking LongTrunkOk attribute for dbh
ok 15 - ... checking TaintIn attribute for dbh
ok 16 - ... checking TaintOut attribute for dbh
ok 17 - ... checking Taint attribute for dbh
ok 18 - ... checking Executed attribute for dbh
ok 19 - ... checking ErrCount attribute for dbh
ok 20 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 21 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 22 - ... checking CachedKids attribute for dbh
ok 23 - ... checking HandleError attribute for dbh
ok 24 - ... checking Profile attribute for dbh
ok 25 - ... checking Statement attribute for dbh
ok 26 - ... checking RowCacheSize attribute for dbh
ok 27 - ... checking ReadOnly attribute for dbh
ok 28 - ... checking FetchHashKeyName attribute for dbh
ok 29 - ... checking Name attribute for dbh
ok 30 - ... checking TraceLevel attribute for dbh
ok 31 - ... checking LongReadLen attribute for dbh
ok 32 - should be able to FETCH_many
ok 33 - should see driver-private dbh attribute value
ok 34 - ... catching exception
ok 35 - ... $dbh->err is undefined
ok 36 - ... checking $dbh->errstr
ok 37 - ... checking $dbh->state
ok 38 - ... checking Executed attribute for dbh
ok 39 - ... checking Executed attribute for dbh (after reset)
ok 40 - ... checking ErrCount attribute for dbh (after error was generated)
ok 41 - The object isa DBI::dr
ok 42 - ... checking $dbh->err
ok 43 - ... checking ErrCount attribute for drh
ok 44 - ... checking Warn attribute for drh
ok 45 - ... checking Active attribute for drh
ok 46 - ... checking AutoCommit attribute for drh
ok 47 - ... checking CompatMode attribute for drh
ok 48 - ... checking InactiveDestory attribute for drh
ok 49 - ... checking AutoInactiveDestory attribute for drh
ok 50 - ... checking PrintError attribute for drh
ok 51 - ... checking PrintWarn attribute for drh
ok 52 - ... checking RaiseError attribute for drh
ok 53 - ... checking ShowErrorStatement attribute for drh
ok 54 - ... checking ChopBlanks attribute for drh
ok 55 - ... checking LongTrunkOk attribute for drh
ok 56 - ... checking TaintIn attribute for drh
ok 57 - ... checking TaintOut attribute for drh
ok 58 - ... checking Taint attribute for drh
ok 59 # skip Executed attribute not supported under DBI::PurePerl
ok 60 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 61 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 62 - ... checking CachedKids attribute for drh
ok 63 - ... checking HandleError attribute for drh
ok 64 - ... checking Profile attribute for drh
ok 65 - ... checking ReadOnly attribute for drh
ok 66 - ... checking TraceLevel attribute for drh
ok 67 - ... checking LongReadLen attribute for drh
ok 68 - ... checking FetchHashKeyName attribute for drh
ok 69 - ... checking Name attribute for drh
ok 70 - The object isa DBI::st
ok 71 - ... checking Executed attribute for sth
ok 72 - ... checking Executed attribute for dbh
ok 73 - ... checking ErrCount attribute for sth
ok 74 - ... checking exception
ok 75 - ... checking $sth->errstr
ok 76 - ... checking $sth->state
ok 77 - ... checking Executed attribute for sth
ok 78 - ... checking Exceuted attribute for dbh
ok 79 - ... checking ErrCount attribute for sth
ok 80 - ... checking exception
ok 81 - ... checking ErrCount attribute for sth (after assignment)
ok 82 - ... checking ErrCount attribute for sth (after reset)
ok 83 - ... checking Warn attribute for sth
ok 84 - ... checking Active attribute for sth
ok 85 - ... checking CompatMode attribute for sth
ok 86 - ... checking InactiveDestroy attribute for sth
ok 87 - ... checking AutoInactiveDestroy attribute for sth
ok 88 - ... checking PrintError attribute for sth
ok 89 - ... checking PrintWarn attribute for sth
ok 90 - ... checking RaiseError attribute for sth
ok 91 - ... checking ShowErrorStatement attribute for sth
ok 92 - ... checking ChopBlanks attribute for sth
ok 93 - ... checking LongTrunkOk attribute for sth
ok 94 - ... checking TaintIn attribute for sth
ok 95 - ... checking TaintOut attribute for sth
ok 96 - ... checking Taint attribute for sth
ok 97 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 98 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 99 - ... checking CachedKids attribute for sth
ok 100 - ... checking HandleError attribute for sth
ok 101 - ... checking Profile attribute for sth
ok 102 - ... checking ReadOnly attribute for sth
ok 103 - ... checking TraceLevel attribute for sth
ok 104 - ... checking LongReadLen attribute for sth
ok 105 - ... checking FetchHashKeyName attribute for sth
ok 106 - ... checking CursorName attribute for sth
ok 107 - ... checking NUM_OF_FIELDS attribute for sth
ok 108 - ... checking NUM_OF_PARAMS attribute for sth
ok 109 - ... checking type of NAME attribute for sth
ok 110 - ... checking number of elements returned
ok 111 - ... checking values returned
ok 112 - ... checking type of NAME_lc attribute for sth
ok 113 - ... checking number of elements returned
ok 114 - ... checking values returned
ok 115 - ... checking type of NAME_uc attribute for sth
ok 116 - ... checking number of elements returned
ok 117 - ... checking values returned
ok 118 - ... checking type of NAME_hash attribute for sth
ok 119 - ... checking number of keys returned
ok 120 - ... checking values returned
ok 121 - ... checking values returned
ok 122 - ... checking type of NAME_lc_hash attribute for sth
ok 123 - ... checking number of keys returned
ok 124 - ... checking values returned
ok 125 - ... checking values returned
ok 126 - ... checking type of NAME_uc_hash attribute for sth
ok 127 - ... checking number of keys returned
ok 128 - ... checking values returned
ok 129 - ... checking values returned
ok 130 - ... checking type of TYPE attribute for sth
ok 131 - ... checking number of elements returned
ok 132 - ... checking values returned
ok 133 - ... checking type of NULLABLE attribute for sth
ok 134 - ... checking number of elements returned
ok 135 - ... checking values returned
ok 136 - ... checking type of PRECISION attribute for sth
ok 137 - ... checking number of elements returned
ok 138 - ... checking values returned
ok 139 - ... checking type of SCALE attribute for sth
ok 140 - ... checking number of elements returned
ok 141 - ... checking values returned
ok 142 - ... checking type of ParamValues attribute for sth
ok 143 - ... checking values returned
ok 144 - ... checking Statement attribute for sth
ok 145 - ... checking type of RowsInCache attribute for sth
ok 146 - should see driver-private sth attribute value
# Checking inheritance
ok 147 - dbh ReadOnly value should be inherited from drh
ok 148 - sth ReadOnly value should be inherited from dbh
ok
t/zvp_07kids.t ............. skipped: $h->{Kids} attribute not supported for DBI::PurePerl
t/zvp_08keeperr.t ..........
1..69
ok 1 - use DBI;
ok 2 - ... checking error
ok 3 - ... checking error
Test HandleSetErr
ok 4 - The object isa DBI::db
ok 5 - ... $DBI::err is not defined
HandleSetErr called: h=DBI::db=HASH(0x2e31cb8), err=, errstr=(got info), state=
ok 6 - ... $DBI::err is defined
ok 7 - ... $DBI::err is an empty string
ok 8 - ... $DBI::errstr is as we expected
ok 9 - ... $dbh->errstr matches $DBI::errstr
ok 10 - ... $warn{failed} is 0
ok 11 - ... $warn{warning} is 0
ok 12 - ... the @handlewarn array is (1, 0, 0)
HandleSetErr called: h=DBI::db=HASH(0x2e31cb8), err=0, errstr=(got warn), state=AA001
warn: 'DBD::ExampleP::db set_err warning: (got info)\n(got warn) at ./t/08keeperr.t line 131\n'
ok 13 - ... $DBI::err is defined
ok 14 - ... $DBI::err is "0"
ok 15 - ... $DBI::errstr is as we expected
ok 16 - ... $dbh->errstr matches $DBI::errstr
ok 17 - ... $DBI::state is AA001
ok 18 - ... $warn{warning} is 1
ok 19 - ... the @handlewarn array is (1, 1, 0)
HandleSetErr called: h=DBI::db=HASH(0x2e31cb8), err=, errstr=(got more info), state=
warn: 'DBD::ExampleP::db set_err warning: (got info)\n(got warn)\n(got more info) at ./t/08keeperr.t line 146\n'
ok 20 - ... $DBI::err is defined
ok 21 - ... $DBI::err is "0"
ok 22 - ... $dbh->err is "0"
ok 23 - ... $DBI::state is AA001
ok 24 - ... $DBI::errstr is as we expected
ok 25 - ... $dbh->errstr matches $DBI::errstr
ok 26 - ... $warn{warning} is 2
ok 27 - ... the @handlewarn array is (2, 1, 0)
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error) at ./t/08keeperr.t line 167\n'
ok 28 - ... $DBI::err is defined
ok 29 - ... $DBI::err is 42
ok 30 - ... $warn{warning} is 2
ok 31 - ... $dbh->errstr is as we expected
ok 32 - ... $DBI::state is AA002
ok 33 - ... the @handlewarn array is (2, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x2e31cb8), err=, errstr=(got info), state=
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info) at ./t/08keeperr.t line 179\n'
ok 34 - ... $DBI::err is defined
ok 35 - ... $DBI::err is 42
ok 36 - ... $warn{warning} is 2
ok 37 - ... $dbh->errstr is as we expected
ok 38 - ... the @handlewarn array is (3, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x2e31cb8), err=0, errstr=(got warn), state=
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) at ./t/08keeperr.t line 190\n'
ok 39 - ... $DBI::err is defined
ok 40 - ... $DBI::err is 42
ok 41 - ... $warn{warning} is 2
ok 42 - ... $dbh->errstr is as we expected
ok 43 - ... the @handlewarn array is (3, 2, 1)
warn: 'DBD::ExampleP::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) [err was 42 now 4200] [state was AA002 now AA003]\n(got new error) at ./t/08keeperr.t line 201\n'
ok 44 - ... $DBI::err is defined
ok 45 - ... $DBI::err is 4200
ok 46 - ... $warn{warning} is 2
ok 47 - ... $dbh->errstr is as we expected
ok 48 - ... the @handlewarn array is (3, 2, 2)
ok 49 - ... $dbh->errstr is defined
ok 50 - ... $dbh->err is defined
ok 51 - ... $dbh->state is an empty string
warn: 'DBD::ExampleP::db set_err failed: foo at ./t/08keeperr.t line 226\n'
ok 52 - ... only returned one value
ok 53 - ... the first value is undefined
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar at ./t/08keeperr.t line 230\n'
ok 54 - ... $dbh->set_err returned undefiend
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz at ./t/08keeperr.t line 231\n'
ok 55 - ... $dbh->set_err returned undefiend
HandleSetErr called: h=DBI::db=HASH(0x2e31cb8), err=0, errstr=warn, state=
warn: 'DBD::ExampleP::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz\nwarn at ./t/08keeperr.t line 232\n'
ok 56 - ... $dbh->set_err returned undefiend
ok 57 - ... $dbh->errstr is as we expected
ok 58 - ... $warn{failed} is 4
ok 59 - ... the @handlewarn array is (0, 1, 3)
warn: 'DBD::ExampleP::db method failed: foo at ./t/08keeperr.t line 242\n'
ok 60 - ... only returned one value
ok 61 - ... the first value is undefined
warn: 'DBD::ExampleP::db method failed: foo at ./t/08keeperr.t line 246\n'
ok 62 - ... only returned one value
ok 63 - ... the first value is "42"
warn: 'DBD::ExampleP::db method failed: foo at ./t/08keeperr.t line 250\n'
ok 64 - ... returned no values
HandleSetErr called: h=DBI::db=HASH(0x2e31cb8), err=, errstr=info, state=override
warn: 'DBD::ExampleP::db set_err failed: errstr99 at ./t/08keeperr.t line 257\n'
ok 65 - ... only returned one value
ok 66 - ... the first value is undefined
ok 67 - ... $dbh->err is 99
ok 68 - ... $dbh->errstr is as we expected
ok 69 - ... $dbh->state is as we expected
ok
t/zvp_09trace.t ............
1..67
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - trace file size = 2729
ok 4 - ... checking TraceLevel attribute
ok 5 - ... trace file successfully created
parse_trace_flag SQL
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
parse_trace_flag foo
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
parse_trace_flag bar
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
parse_trace_flag baz
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
parse_trace_flag boo
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
parse_trace_flag bop
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53
parse_trace_flag SQL foo bar baz boo bop
ok 54 - ...
ok 55 - ...
inherit
ok 56 - The object isa DBI::st
ok 57
ok 58
ok 59
test unknown parse_trace_flag
ok 60
ok 61
caught warn: DBI::db=HASH(0x3914070)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at DBI::PurePerl DBI::common::parse_trace_flags line 49
ok 62
ok 63
caught warn: DBI::db=HASH(0x3914070)->parse_trace_flags(nonesuch|SQL|nonesuch2) ignored unknown trace flags: 'nonesuch' 'nonesuch2' at DBI::PurePerl DBI::common::parse_trace_flags line 49
ok 64
ok 65
ok 66
ok 67
ok
t/zvp_10examp.t ............
1..210
ok 1 - connect should fail
ok 2 - ... we should have an exception here
ok 3 - ... $dbh2 should not be defined
ok 4
ok 5
ok 6 - ... these 2 handles are cached, so they are the same
ok 7
ok 8 - ... this handle was created with different parameters, so it is not the same
ok 9
ok 10 - Executed should be true
ok 11
ok 12 - should return same handle
ok 13 - Executed should be false because reset by connect attributes
ok 14 - The object isa DBI::dr
ok 15 - ... these are our cached kids
ok 16 - ... we have emptied out cache
ok 17
ok 18 - ... PrintError should be 0
ok 19 - ... FetchHashKey is NAME
ok 20 - ... checking the example driver_path
others
ok 21
ok 22 - ping should return true
ok 23 - prepare should fail
ok 24 - sth->err should be true
ok 25 - DBI::err should be true
ok 26 - $DBI::err should match $dbh->err
ok 27 - $DBI::errstr should contain error string
ok 28 - $DBI::errstr should match $dbh->errstr
ok 29
ok 30
ok 31
ok 32 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 33 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 34 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53 - errstr should contain error message
ok 54
ok 55 - errstr should contain error message
ok 56
ok 57
ok 58 - errstr should contain error message
ok 59
ok 60 - errstr should contain error message
ok 61
ok 62
ok 63
ok 64
ok 65
ok 66
ok 67
ok 68
fetchrow_hashref('NAME_uc')
ok 69
ok 70
ok 71
ok 72
ok 73
fetchrow_hashref('ParamValues')
ok 74
ok 75
FetchHashKeyName
ok 76
ok 77
ok 78
ok 79
ok 80
ok 81
fetchall_arrayref
ok 82
ok 83
ok 84
ok 85
ok 86
ok 87
fetchall_arrayref array slice
ok 88
ok 89
ok 90
ok 91
fetchall_arrayref hash slice
ok 92
ok 93
ok 94
ok 95
fetchall_arrayref hash
ok 96
ok 97
ok 98
ok 99 - '16895 0 .' ne '16895 0 .'
rows()
ok 100 - row count 3
ok 101 - 3 vs 3
ok 102 - 3 vs 3
fetchall_arrayref array slice and max rows
ok 103
ok 104
ok 105
selectrow_array
ok 106
ok 107
selectrow_hashref
ok 108
ok 109
ok 110
ok 111
selectall_arrayref
ok 112
ok 113
ok 114
ok 115
selectall_arrayref Slice array slice
ok 116
ok 117
ok 118 - ". 16895" eq ". 16895"
ok 119
selectall_arrayref Columns array slice
ok 120
ok 121
ok 122 - ". 16895" eq ". 16895"
ok 123
selectall_arrayref hash slice
ok 124
ok 125
ok 126
ok 127
ok 128
ok 129
ok 130
selectall_hashref
ok 131 - selectall_hashref result
ok 132 - selectall_hashref HASH: HASH
ok 133
ok 134 - 0 eq 0
selectall_hashref by column number
ok 135
ok 136 - 0 eq 0
selectcol_arrayref
ok 137
ok 138
ok 139
selectcol_arrayref column slice
ok 140
ok 141
ok 142
ok 143
others...
ok 144
ok 145
RaiseError & PrintError & ShowErrorStatement
ok 146
ok 147
ok 148
ok 149
ok 150
ok 151
ok 152
ok 153
ok 154
ok 155
ok 156
ok 157
ok 158
ok 159
ok 160
ok 161 - DBD::ExampleP::st execute failed: 2 values bound when 1 expected [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at DBI::PurePerl DBI::st::execute line 118.
#
ok 162 - DBD::ExampleP::st execute failed: 2 values bound when 1 expected [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at DBI::PurePerl DBI::st::execute line 118.
#
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168
HandleError
ok 169
ok 170
HandleError -> die
ok 171
ok 172 - HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x381ee18), rv=undef, \#=3] at ./t/10examp.t line 397.
#
HandleError -> 0 -> RaiseError
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x381ee18), rv=undef, #=3]
ok 173
ok 174 - DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 at DBI::PurePerl DBI::db::prepare line 116.
#
HandleError -> 1 -> return (original)undef
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x381ee18), rv=undef, #=3]
ok 175 -
ok 176
HandleError -> 2 -> return (modified)42
HandleError: DBD::ExampleP::db prepare failed: Unknown field names: unknown_field_name2 [h=DBI::db=HASH(0x381ee18), rv=undef, #=3]
ok 177 -
ok 178
ok 179
ok 180 - The object isa DBI::st
ok 181
ok 182
ok 183
ok 184 - Remove dumpcsr.tst
ok 185 - Actually gone
# table_info
ok 186
# Local blib/lib subdirs: DBD auto .. . Bundle Win32 DBI
ok 187
ok 188
ok 189
# tables
ok 190 - Table count mismatch5 vs 5
ok 191 - "schema"."table" ne "schema"."table"
ok 192 - "sch-ema"."table" ne "sch-ema"."table"
ok 193 - "schema"."ta-ble" ne "schema"."ta-ble"
ok 194 - "sch ema"."table" ne "sch ema"."table"
ok 195 - "schema"."ta ble" ne "schema"."ta ble"
# Testing the fake directories (0).
ok 196
ok 197
ok 198 - 0 rows instead of 0
ok 199
# Testing the fake directories (100).
ok 200
ok 201
ok 202 - 100 rows instead of 100
ok 203 - 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
# Testing the fake directories (200).
ok 204
ok 205
ok 206 - 200 rows instead of 200
ok 207 - 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
# Testing $dbh->func().
ok 208
ok 209
ok 210 - ping should return false after disconnect
ok
t/zvp_11fetch.t ............
1..24
# fetchall_hashref(C1)
ok 1
ok 2
ok 3
ok 4
# fetchall_hashref(C2)
ok 5
ok 6
ok 7
ok 8
# fetchall_hashref([C2])
ok 9
ok 10
ok 11
ok 12
# fetchall_hashref([C1 C2])
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok
t/zvp_12quote.t ............
1..10
ok 1 - ... quoting strings with embedded single quotes
ok 2 - ... quoting number as SQL_VARCHAR
ok 3 - ... quoting number as SQL_INTEGER
ok 4 - ... quoting undef as NULL
ok 5 - ... properly quotes foo as "foo"
ok 6 - ... properly quotes f"o as "f""o"
ok 7 - ... properly quotes foo, bar as "foo"."bar"
ok 8 - ... properly quotes undef, undef, bar as "bar"
ok 9 - ... properly quotes foo, undef, bar as "foo"."bar"
ok 10 - ... now quotes it as "bar"@"foo" after flushing cache
ok
t/zvp_13taint.t ............ skipped: Taint attributes not supported with DBI::PurePerl
t/zvp_14utf8.t .............
1..16
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok
t/zvp_15array.t ............
1..55
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - The object isa DBI::st
ok 4 - ... we should have 0 rows
ok 5 - ... execute_array should return false
ok 6 - execute_array failure with RaiseError should have died
ok 7
ok 8 - ... we should have 2 rows
ok 9 - ... we should have 3 tuple_status
ok 10 - ... our rows are as expected
ok 11 - ... our tuple_status is as expected
ok 12 - ... bind_param_array should return true
ok 13 - ... execute_array should return true
ok 14 - ... we should have 3 rows
ok 15 - ... we should have 3 tuple_status
ok 16 - ... our rows are as expected
ok 17 - ... our tuple_status is as expected
ok 18 - ... execute_array should return true
ok 19 - ... we should have executed 3 rows
ok 20 - ... we should have affected 3 rows
ok 21 - ... execute_array should return true
ok 22 - ... execute_array should return 0 (but true)
ok 23 - ... we should have 0 rows
ok 24 - ... we should have 0 tuple_status
ok 25 - ... execute_array should return 1
ok 26 - ... we should have 1 rows
ok 27 - ... our rows are as expected
ok 28 - ... we should have 1 tuple_status
ok 29 - ... our tuple_status is as expected
ok 30 - ... execute_array should return 0
ok 31 - ... we should have 0 rows
ok 32 - ... we should have 0 tuple_status
ok 33 - The object isa DBI::st
ok 34 - ... execute_array should return true
ok 35 - ... execute_array should return 0 (but true)
ok 36 - ... we should have 0 rows
ok 37 - ... execute_array should return true
ok 38 - ... we should have 2 rows
ok 39 - ... we should have 2 tuple_status
ok 40 - ... rows should match
ok 41 - ... tuple_status should match
ok 42 - The object isa DBI::st
ok 43 - ... execute_array should return true
ok 44 - ... we should have 3 rows
ok 45 - ... we should have 3 tuple_status
ok 46 - ... rows should match
ok 47 - ... tuple status should match
ok 48 - ... execute_array should return undef
ok 49 - ... errstr is as expected
ok 50 - ... execute_array should return undef
ok 51 - ... errstr is as expected
ok 52 - ... execute_array should return undef
ok 53 - ... errstr is as expected
ok 54 - ... bind_param_array should return undef
ok 55 - ... errstr is as expected
ok
t/zvp_16destroy.t ..........
1..20
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - Install test driver
ok 5 - Connect to test driver
ok 6 - Should start active
ok 7 - Should be active in DESTROY
ok 8 - Create with ActiveDestroy
ok 9 - InactiveDestroy should be set
ok 10 - Should start active
ok 11 - Should not be active in DESTROY
ok 12 - Create with AutoInactiveDestroy
ok 13 - InactiveDestroy should be set
ok 14 - Should start active
ok 15 - Should be active in DESTROY
ok 16 - Create with AutoInactiveDestroy again
ok 17 - InactiveDestroy should be set
ok 18 - Should start active
ok 19 - Child should be inactive on DESTROY
ok 20 - Should be active in DESTROY
ok
t/zvp_19fhtrace.t ..........
1..27
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking TraceLevel attribute
ok 4 - ... regular fh: trace file successfully created
ok 5 - ... regular fh: filehandle successfully set
ok 6 - ... regular fh: trace_msg
ok 7 - ... regular fh: file successfully changed
Next logline
ok 8 - ... regular fh: trace_msg after changing trace output
ok 9 - Tracefile removed
ok 10 - Tracefile FOO opened
ok 11 - Tracefile created
ok 12 - Regression test
ok 13 - Traced message
ok 14 - Regression test
ok 15 - ... layered fh: file is layered: *** Test our layer
#
#
ok 16 - ... layered fh: filehandle successfully set
ok 17 - ... layered fh: trace_msg: Layered logline
#
#
DBI::db=HASH(0x377d260) trace level set to 1 in DBI 1.615 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 18 - ... layered fh: close doesn't close: Layered logline
#
#
Next logline
ok 19 - ... layered fh: trace_msg after change trace output: Layered logline
#
#
ok 20 - ... scalar trace: file is layered: *** Test our layer
#
#
ok 21 - ... scalar trace: filehandle successfully set
ok 22 - ... scalar trace: *** Test our layer
# DBI::db=HASH(0x377d260) trace level set to 1 in DBI 1.615 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
DBI::db=HASH(0x377d260) trace level set to 1 in DBI 1.615 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 23 - ... scalar trace: close doesn't close: *** Test our layer
# DBI::db=HASH(0x377d260) trace level set to 1 in DBI 1.615 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
Next logline
ok 24 - ... scalar trace: after change trace output: *** Test our layer
# DBI::db=HASH(0x377d260) trace level set to 1 in DBI 1.615 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
ok 25 - ... logger: trace_msg
#
DBI::db=HASH(0x377d260) trace level set to 1 in DBI 1.615 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 26 - ... logger: close doesn't close
#
Next logline
ok 27 - ... logger: trace_msg after change trace output
#
ok
t/zvp_20meta.t .............
1..8
ok 1 - use DBI;
ok 2 - use DBI::DBD::Metadata;
ok 3 - The object isa DBI::db
ok 4
ok 5
ok 6
ok 7
ok 8
ok
t/zvp_30subclass.t .........
1..36
ok 1 - use DBI;
ok 2 - The object isa MyDBI::db
ok 3
ok 4 - The object isa MyDBI::db
ok 5
ok 6
ok 7 - The object isa MyDBI::st
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15 - The reference isa ARRAY
ok 16
ok 17
ok 18
ok 19
ok 20 - Clone A isa MyDBI::db
ok 21
ok 22
ok 23 - Clone B isa MyDBI::db
ok 24
ok 25
ok 26 - The object isa MyDBI::db
ok 27
ok 28 - installed method isa ARRAY
ok 29
ok 30
ok 31
ok 32
ok 33 - Failed connect \#1
ok 34
ok 35 - Failed connect \#2
ok 36
fetch 4 prepare 1
ok
t/zvp_35thrclone.t .........
1..20
ok 1 - use DBI;
ok 2 - ... assignment of neat_maxlen was successful
ok 3 - The object isa DBI::db
ok 4 - ... DBI::neat_maxlen still holding its value
ok 5 - The object isa DBI::db
ok 6 - ... new $dbh is not the same instance as $dbh_parent
ok 7
ok 8 - ... DBI::neat_maxlen still holding its value
ok 9 - The object isa DBI::db
ok 10 - ... new $dbh is not the same instance as $dbh_parent
ok 11
ok 12 - ... DBI::neat_maxlen still holding its value
ok 13 - The object isa DBI::db
ok 14 - ... new $dbh is not the same instance as $dbh_parent
ok 15
ok 16 - ... DBI::neat_maxlen still holding its value
ok 17 - The object isa DBI::db
ok 18 - ... new $dbh is not the same instance as $dbh_parent
ok 19
ok 20 - ... all tests have passed
ok
t/zvp_40profile.t .......... skipped: profiling not supported for DBI::PurePerl
t/zvp_41prof_dump.t ........ skipped: profiling not supported for DBI::PurePerl
t/zvp_42prof_data.t ........ skipped: profiling not supported for DBI::PurePerl
t/zvp_43prof_env.t ......... skipped: profiling not supported for DBI::PurePerl
t/zvp_49dbd_file.t .........
ok 1 - use DBI;
ok 2 - use DBD::File;
ok 3 - Connect clean
ok 4 - Can connect to DBD::File driver
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 5 - f_versions
ok 6 - Connect with DBI attributes
ok 7 - Connect with driver attributes in DSN
ok 8 - Connect with driver attributes in hash
ok 9 - Prepare select from non-existing file
ok 10 - Cannot open non-existing file
# C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4468\t_sbdgf_53442gz.txt
ok 11 - drop manually created table db_4468_2 (first file)
ok 12 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4468\db_4468_2.txt removed
ok 13 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4468\db_4468_2 exists
ok 14 - drop manually created table db_4468_2 (second file)
ok 15 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4468\db_4468_2 removed
ok 16 - Create table db_4468_
ok 17 - Test table exists
ok 18 - get single table meta data
ok 19 - get multiple meta data
ok 20 - encoding shows in layer
ok 21 - set single meta datum
ok 22 - verify set single meta datum
ok 23 - set multiple meta data
ok 24 - verify set multiple meta attributes
ok 25 - Prepare select * from db_4468_
ok 26 - execute on db_4468_
ok 27 - Prepare select * from DB_4468_
ok 28 - execute on DB_4468_
ok 29 - table drop
ok 30 - Test table removed
1..30
ok
t/zvp_50dbm_simple.t .......
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable FreezeThaw YAML JSON
--- Using SDBM_File () ---
# DBD::DBM 0.06 using SDBM_File (1.06)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 1 - dbm_versions
ok 2 - The object isa DBI::db
ok 3
ok 4
ok 5
ok 6 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 7 - execute
ok 8 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 9 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 10 - execute
ok 11 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 12 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 13 - execute
ok 14 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 15 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 16 - execute
ok 17 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 18 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 19 - execute
ok 20 - INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 21 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 22 - execute
ok 23 - INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 24 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 25 - execute
ok 26 - INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 27 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 28 - execute
ok 29 - INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 30 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 31 - execute
ok 32 - INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 33 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 34 - execute
ok 35 - DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 36 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows
ok 37 - prepare UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 38 - execute
ok 39 - UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 40 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows
ok 41 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 42 - execute
ok 43 - DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 44 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows
ok 45 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 46 - execute
ok 47 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 48 - SELECT results
ok 49 - prepare DELETE FROM SDBM_File_fruit
ok 50 - execute
ok 51 - DELETE FROM SDBM_File_fruit
ok 52 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 53 - prepare DROP TABLE SDBM_File_fruit
ok 54 - execute
ok 55 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Data::Dumper
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 56 - dbm_versions
ok 57 - The object isa DBI::db
ok 58
ok 59
ok 60
ok 61 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 62 - execute
ok 63 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 64 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 65 - execute
ok 66 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 67 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 68 - execute
ok 69 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 70 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 71 - execute
ok 72 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 73 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 74 - execute
ok 75 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 76 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 77 - execute
ok 78 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 79 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 80 - execute
ok 81 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 82 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 83 - execute
ok 84 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 85 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 86 - execute
ok 87 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 88 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 89 - execute
ok 90 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 91 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 92 - execute
ok 93 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 94 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 95 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 96 - execute
ok 97 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 98 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 99 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 100 - execute
ok 101 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 102 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 103 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 104 - execute
ok 105 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 106 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 107 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 108 - execute
ok 109 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 110 - SELECT results
ok 111 - prepare DELETE FROM SDBM_File_fruit
ok 112 - execute
ok 113 - DELETE FROM SDBM_File_fruit
ok 114 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 115 - prepare DROP TABLE SDBM_File_fruit
ok 116 - execute
ok 117 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Storable
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 118 - dbm_versions
ok 119 - The object isa DBI::db
ok 120
ok 121
ok 122
ok 123 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 124 - execute
ok 125 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 126 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 127 - execute
ok 128 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 129 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 130 - execute
ok 131 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 132 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 133 - execute
ok 134 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 135 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 136 - execute
ok 137 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 138 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 139 - execute
ok 140 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 141 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 142 - execute
ok 143 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 144 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 145 - execute
ok 146 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 147 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 148 - execute
ok 149 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 150 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 151 - execute
ok 152 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 153 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 154 - execute
ok 155 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 156 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 157 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 158 - execute
ok 159 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 160 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 161 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 162 - execute
ok 163 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 164 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 165 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 166 - execute
ok 167 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 168 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 169 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 170 - execute
ok 171 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 172 - SELECT results
ok 173 - prepare DELETE FROM SDBM_File_fruit
ok 174 - execute
ok 175 - DELETE FROM SDBM_File_fruit
ok 176 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 177 - prepare DROP TABLE SDBM_File_fruit
ok 178 - execute
ok 179 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (FreezeThaw) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::FreezeThaw
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 180 - dbm_versions
ok 181 - The object isa DBI::db
ok 182
ok 183
ok 184
ok 185 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 186 - execute
ok 187 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 188 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 189 - execute
ok 190 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 191 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 192 - execute
ok 193 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 194 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 195 - execute
ok 196 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 197 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 198 - execute
ok 199 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 200 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 201 - execute
ok 202 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 203 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 204 - execute
ok 205 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 206 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 207 - execute
ok 208 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 209 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 210 - execute
ok 211 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 212 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 213 - execute
ok 214 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 215 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 216 - execute
ok 217 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 218 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 219 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 220 - execute
ok 221 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 222 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 223 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 224 - execute
ok 225 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 226 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 227 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 228 - execute
ok 229 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 230 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 231 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 232 - execute
ok 233 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 234 - SELECT results
ok 235 - prepare DELETE FROM SDBM_File_fruit
ok 236 - execute
ok 237 - DELETE FROM SDBM_File_fruit
ok 238 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 239 - prepare DROP TABLE SDBM_File_fruit
ok 240 - execute
ok 241 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (YAML) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::YAML (0.10)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 242 - dbm_versions
ok 243 - The object isa DBI::db
ok 244
ok 245
ok 246
ok 247 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 248 - execute
ok 249 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 250 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 251 - execute
ok 252 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 253 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 254 - execute
ok 255 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 256 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 257 - execute
ok 258 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 259 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 260 - execute
ok 261 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 262 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 263 - execute
ok 264 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 265 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 266 - execute
ok 267 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 268 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 269 - execute
ok 270 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 271 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 272 - execute
ok 273 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 274 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 275 - execute
ok 276 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 277 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 278 - execute
ok 279 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 280 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 281 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 282 - execute
ok 283 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 284 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 285 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 286 - execute
ok 287 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 288 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 289 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 290 - execute
ok 291 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 292 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 293 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 294 - execute
ok 295 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 296 - SELECT results
ok 297 - prepare DELETE FROM SDBM_File_fruit
ok 298 - execute
ok 299 - DELETE FROM SDBM_File_fruit
ok 300 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 301 - prepare DROP TABLE SDBM_File_fruit
ok 302 - execute
ok 303 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (JSON) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::JSON (0.001)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 304 - dbm_versions
ok 305 - The object isa DBI::db
ok 306
ok 307
ok 308
ok 309 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 310 - execute
ok 311 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 312 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 313 - execute
ok 314 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 315 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 316 - execute
ok 317 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 318 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 319 - execute
ok 320 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 321 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 322 - execute
ok 323 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 324 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 325 - execute
ok 326 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 327 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 328 - execute
ok 329 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 330 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 331 - execute
ok 332 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 333 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 334 - execute
ok 335 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 336 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 337 - execute
ok 338 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 339 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 340 - execute
ok 341 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 342 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 343 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 344 - execute
ok 345 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 346 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 347 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 348 - execute
ok 349 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 350 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 351 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 352 - execute
ok 353 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 354 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 355 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 356 - execute
ok 357 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 358 - SELECT results
ok 359 - prepare DELETE FROM SDBM_File_fruit
ok 360 - execute
ok 361 - DELETE FROM SDBM_File_fruit
ok 362 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 363 - prepare DROP TABLE SDBM_File_fruit
ok 364 - execute
ok 365 - DROP TABLE SDBM_File_fruit
1..365
ok
t/zvp_51dbm_file.t .........
ok 1 - drop table
ok 2 - FRED.dir exists
ok 3 - fred.dir exists
ok 4 - insert into mixed case table
ok 5 - insert into uppercase table
ok 6 - rows found via cloned mixed case table
ok 7 - drop table
ok 8 - rows found via mixed case table
ok 9 # skip quoted identifiers aren't supported by DBI::SQL::Nano
ok 10 - drop table
1..10
ok
t/zvp_52dbm_complex.t ...... skipped: Not running with SQL::Statement
t/zvp_60preparse.t ......... skipped: preparse not supported for DBI::PurePerl
t/zvp_65transact.t .........
1..10
begin_work...
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok
t/zvp_70callbacks.t ........ skipped: $h->{Callbacks} attribute not supported for DBI::PurePerl
t/zvp_72childhandles.t .....
1..16
ok 1
ok 2
ok 3
ok 4
ok 5 - All handles should be undef now
ok 6 - ChildHandles should be an array-ref if wekref is available
ok 7
drh DBI::dr=HASH(0x3684c78)
dbh DBI::db=HASH(0x3737090)
sth DBI::st=HASH(0x369a9b8)
sth DBI::st=HASH(0x369cd20)
sth DBI::st=HASH(0x369c3d8)
ok 8
ok 9
ok 10
ok 11
ok 12 - handles should be gone now
ok 13
ok 14
ok 15
ok 16
ok
t/zvp_80proxy.t ............ skipped: modules required for proxy are probably not installed (e.g., RPC/PlClient.pm)
t/zvp_85gofer.t ............
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5268;dbm_type=SDBM_File;f_lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5268;dbm_type=SDBM_File;f_lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x44a24d8)
ok 20
ok 21
ok 22
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5268;dbm_type=SDBM_File;f_lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5268;dbm_type=SDBM_File;f_lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x43dbc68)
ok 46
ok 47
ok 48
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5268;dbm_type=SDBM_File;f_lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5268;dbm_type=SDBM_File;f_lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x44a1088)
ok 72
ok 73
ok 74
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
1..78
ok
t/zvp_86gofer_fail.t ....... skipped: requires Callbacks which are not supported with PurePerl
t/zvp_87gofer_cache.t ......
using DBI::Util::CacheMemory=HASH(0x36ea4b0) for dbi:Gofer:transport=null;policy=classic;dsn=dbi:ExampleP:
ok 1
ok 2
ok 3 - cache should be empty after clear
ok 4 - transmit_count should be 0
ok 5
ok 6 - cache should not be empty after select
ok 7
ok 8
ok 9
ok 10 - should make 1 round trip
ok 11 - transmit_count should be 0
ok 12
ok 13
ok 14 - should make 1 round trip
ok 15
ok 16
ok 17
using 1 for dbi:Gofer:transport=null;policy=classic;dsn=dbi:ExampleP:
ok 18
ok 19
ok 20 - cache should be empty after clear
ok 21 - transmit_count should be 0
ok 22
ok 23 - cache should not be empty after select
ok 24
ok 25
ok 26
ok 27 - should make 1 round trip
ok 28 - transmit_count should be 0
ok 29
ok 30
ok 31 - should make 1 round trip
ok 32
ok 33
ok 34
test per-sth go_cache
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
1..47
ok
t/zvp_90sql_type_cast.t ....
1..24
ok 1 - result, undef
ok 2 # skip DiscardString not supported in PurePerl
ok 3 - result, invalid sql type
ok 4 - json invalid sql type
ok 5 - result, non numeric cast to int
ok 6 - json non numeric cast to int
ok 7 - result, non numeric cast to int (strict)
ok 8 - json non numeric cast to int (strict)
ok 9 - result, small int cast to int
ok 10 - json small int cast to int
ok 11 - result, 2 byte max signed int cast to int
ok 12 - json 2 byte max signed int cast to int
ok 13 - result, 2 byte max unsigned int cast to int
ok 14 - json 2 byte max unsigned int cast to int
ok 15 - result, 4 byte max signed int cast to int
ok 16 - json 4 byte max signed int cast to int
ok 17 - result, 4 byte max unsigned int cast to int
ok 18 - json 4 byte max unsigned int cast to int
ok 19 - result, small int cast to int (discard)
ok 20 # skip DiscardString not supported in PurePerl
ok 21 - result, non numeric cast to numeric
ok 22 - json non numeric cast to numeric
ok 23 - result, non numeric cast to numeric (strict)
ok 24 - json non numeric cast to numeric (strict)
ok
t/zvxgn_49dbd_file.t .......
ok 1 - use DBI;
ok 2 - use DBD::File;
ok 3 - Connect clean
ok 4 - Can connect to DBD::File driver
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 5 - f_versions
ok 6 - Connect with DBI attributes
ok 7 - Connect with driver attributes in DSN
ok 8 - Connect with driver attributes in hash
ok 9 - Prepare select from non-existing file
ok 10 - Cannot open non-existing file
# C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5508\t_sbdgf_53442gz.txt
ok 11 - drop manually created table db_5508_2 (first file)
ok 12 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5508\db_5508_2.txt removed
ok 13 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5508\db_5508_2 exists
ok 14 - drop manually created table db_5508_2 (second file)
ok 15 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5508\db_5508_2 removed
ok 16 - Create table db_5508_
ok 17 - Test table exists
ok 18 - get single table meta data
ok 19 - get multiple meta data
ok 20 - encoding shows in layer
ok 21 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 22 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 23 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 24 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 25 - Prepare select * from db_5508_
ok 26 # skip method intrusion didn't work with proxying
ok 27 - Prepare select * from DB_5508_
ok 28 # skip method intrusion didn't work with proxying
ok 29 - table drop
ok 30 - Test table removed
1..30
ok
t/zvxgn_50dbm_simple.t .....
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable FreezeThaw YAML JSON
--- Using SDBM_File () ---
# DBD::DBM 0.06 using SDBM_File (1.06)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 1 - dbm_versions
ok 2 - The object isa DBI::db
ok 3 # skip Can't set attributes after connect using DBD::Gofer
ok 4 # skip Can't set attributes after connect using DBD::Gofer
ok 5
ok 6 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 7 - execute
ok 8 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 9 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 10 - execute
ok 11 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 12 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 13 - execute
ok 14 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 15 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 16 - execute
ok 17 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 18 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 19 - execute
ok 20 - INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 21 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 22 - execute
ok 23 - INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 24 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 25 - execute
ok 26 - INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 27 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 28 - execute
ok 29 - INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 30 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 31 - execute
ok 32 - INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 33 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 34 - execute
ok 35 - DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
not ok 36 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 37 - prepare UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 38 - execute
ok 39 - UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
not ok 40 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 41 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 42 - execute
ok 43 - DELETE FROM SDBM_File_fruit WHERE dKey=7
not ok 44 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 45 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 46 - execute
ok 47 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 48 - SELECT results
ok 49 - prepare DELETE FROM SDBM_File_fruit
ok 50 - execute
ok 51 - DELETE FROM SDBM_File_fruit
not ok 52 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 53 - prepare DROP TABLE SDBM_File_fruit
ok 54 - execute
ok 55 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Data::Dumper
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 56 - dbm_versions
ok 57 - The object isa DBI::db
ok 58 # skip Can't set attributes after connect using DBD::Gofer
ok 59 # skip Can't set attributes after connect using DBD::Gofer
ok 60
ok 61 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 62 - execute
ok 63 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 64 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 65 - execute
ok 66 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 67 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 68 - execute
ok 69 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 70 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 71 - execute
ok 72 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 73 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 74 - execute
ok 75 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 76 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 77 - execute
ok 78 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 79 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 80 - execute
ok 81 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 82 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 83 - execute
ok 84 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 85 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 86 - execute
ok 87 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 88 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 89 - execute
ok 90 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 91 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 92 - execute
ok 93 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 94 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 95 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 96 - execute
ok 97 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 98 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 99 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 100 - execute
ok 101 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 102 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 103 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 104 - execute
ok 105 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 106 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 107 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 108 - execute
ok 109 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 110 - SELECT results
ok 111 - prepare DELETE FROM SDBM_File_fruit
ok 112 - execute
ok 113 - DELETE FROM SDBM_File_fruit
not ok 114 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 115 - prepare DROP TABLE SDBM_File_fruit
ok 116 - execute
ok 117 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Storable
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 118 - dbm_versions
ok 119 - The object isa DBI::db
ok 120 # skip Can't set attributes after connect using DBD::Gofer
ok 121 # skip Can't set attributes after connect using DBD::Gofer
ok 122
ok 123 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 124 - execute
ok 125 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 126 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 127 - execute
ok 128 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 129 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 130 - execute
ok 131 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 132 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 133 - execute
ok 134 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 135 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 136 - execute
ok 137 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 138 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 139 - execute
ok 140 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 141 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 142 - execute
ok 143 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 144 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 145 - execute
ok 146 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 147 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 148 - execute
ok 149 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 150 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 151 - execute
ok 152 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 153 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 154 - execute
ok 155 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 156 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 157 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 158 - execute
ok 159 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 160 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 161 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 162 - execute
ok 163 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 164 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 165 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 166 - execute
ok 167 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 168 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 169 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 170 - execute
ok 171 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 172 - SELECT results
ok 173 - prepare DELETE FROM SDBM_File_fruit
ok 174 - execute
ok 175 - DELETE FROM SDBM_File_fruit
not ok 176 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 177 - prepare DROP TABLE SDBM_File_fruit
ok 178 - execute
ok 179 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (FreezeThaw) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::FreezeThaw
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 180 - dbm_versions
ok 181 - The object isa DBI::db
ok 182 # skip Can't set attributes after connect using DBD::Gofer
ok 183 # skip Can't set attributes after connect using DBD::Gofer
ok 184
ok 185 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 186 - execute
ok 187 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 188 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 189 - execute
ok 190 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 191 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 192 - execute
ok 193 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 194 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 195 - execute
ok 196 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 197 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 198 - execute
ok 199 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 200 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 201 - execute
ok 202 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 203 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 204 - execute
ok 205 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 206 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 207 - execute
ok 208 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 209 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 210 - execute
ok 211 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 212 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 213 - execute
ok 214 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 215 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 216 - execute
ok 217 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 218 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 219 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 220 - execute
ok 221 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 222 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 223 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 224 - execute
ok 225 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 226 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 227 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 228 - execute
ok 229 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 230 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 231 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 232 - execute
ok 233 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 234 - SELECT results
ok 235 - prepare DELETE FROM SDBM_File_fruit
ok 236 - execute
ok 237 - DELETE FROM SDBM_File_fruit
not ok 238 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 239 - prepare DROP TABLE SDBM_File_fruit
ok 240 - execute
ok 241 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (YAML) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::YAML (0.10)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 242 - dbm_versions
ok 243 - The object isa DBI::db
ok 244 # skip Can't set attributes after connect using DBD::Gofer
ok 245 # skip Can't set attributes after connect using DBD::Gofer
ok 246
ok 247 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 248 - execute
ok 249 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 250 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 251 - execute
ok 252 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 253 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 254 - execute
ok 255 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 256 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 257 - execute
ok 258 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 259 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 260 - execute
ok 261 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 262 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 263 - execute
ok 264 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 265 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 266 - execute
ok 267 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 268 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 269 - execute
ok 270 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 271 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 272 - execute
ok 273 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 274 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 275 - execute
ok 276 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 277 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 278 - execute
ok 279 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 280 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 281 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 282 - execute
ok 283 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 284 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 285 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 286 - execute
ok 287 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 288 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 289 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 290 - execute
ok 291 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 292 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 293 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 294 - execute
ok 295 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 296 - SELECT results
ok 297 - prepare DELETE FROM SDBM_File_fruit
ok 298 - execute
ok 299 - DELETE FROM SDBM_File_fruit
not ok 300 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 301 - prepare DROP TABLE SDBM_File_fruit
ok 302 - execute
ok 303 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (JSON) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::JSON (0.001)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 304 - dbm_versions
ok 305 - The object isa DBI::db
ok 306 # skip Can't set attributes after connect using DBD::Gofer
ok 307 # skip Can't set attributes after connect using DBD::Gofer
ok 308
ok 309 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 310 - execute
ok 311 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 312 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 313 - execute
ok 314 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 315 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 316 - execute
ok 317 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 318 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 319 - execute
ok 320 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 321 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 322 - execute
ok 323 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 324 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 325 - execute
ok 326 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 327 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 328 - execute
ok 329 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 330 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 331 - execute
ok 332 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 333 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 334 - execute
ok 335 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 336 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 337 - execute
ok 338 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 339 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 340 - execute
ok 341 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 342 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 343 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 344 - execute
ok 345 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 346 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 347 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 348 - execute
ok 349 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 350 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 351 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 352 - execute
ok 353 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 354 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 355 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 356 - execute
ok 357 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 358 - SELECT results
ok 359 - prepare DELETE FROM SDBM_File_fruit
ok 360 - execute
ok 361 - DELETE FROM SDBM_File_fruit
not ok 362 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 363 - prepare DROP TABLE SDBM_File_fruit
ok 364 - execute
ok 365 - DROP TABLE SDBM_File_fruit
1..365
ok
t/zvxgn_51dbm_file.t .......
ok 1 - drop table
ok 2 - FRED.dir exists
ok 3 - fred.dir exists
ok 4 - insert into mixed case table
ok 5 - insert into uppercase table
ok 6 - rows found via mixed case table
ok 7 # skip quoted identifiers aren't supported by DBI::SQL::Nano
ok 8 - drop table
1..8
ok
t/zvxgn_52dbm_complex.t .... skipped: Not running with SQL::Statement
t/zvxgn_85gofer.t ..........
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_3900;dbm_type=SDBM_File;f_lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_3900;dbm_type=SDBM_File;f_lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x38e76d0)
ok 20 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 21 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 22 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_3900;dbm_type=SDBM_File;f_lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_3900;dbm_type=SDBM_File;f_lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x38f7668)
ok 46 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 47 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 48 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_3900;dbm_type=SDBM_File;f_lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_3900;dbm_type=SDBM_File;f_lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x38f9338)
ok 72 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 73 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 74 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
1..78
ok
t/zvxgnp_49dbd_file.t ......
ok 1 - use DBI;
ok 2 - use DBD::File;
ok 3 - Connect clean
ok 4 - Can connect to DBD::File driver
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 5 - f_versions
ok 6 - Connect with DBI attributes
ok 7 - Connect with driver attributes in DSN
ok 8 - Connect with driver attributes in hash
ok 9 - Prepare select from non-existing file
ok 10 - Cannot open non-existing file
# C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4180\t_sbdgf_53442gz.txt
ok 11 - drop manually created table db_4180_2 (first file)
ok 12 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4180\db_4180_2.txt removed
ok 13 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4180\db_4180_2 exists
ok 14 - drop manually created table db_4180_2 (second file)
ok 15 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4180\db_4180_2 removed
ok 16 - Create table db_4180_
ok 17 - Test table exists
ok 18 - get single table meta data
ok 19 - get multiple meta data
ok 20 - encoding shows in layer
ok 21 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 22 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 23 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 24 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 25 - Prepare select * from db_4180_
ok 26 # skip method intrusion didn't work with proxying
ok 27 - Prepare select * from DB_4180_
ok 28 # skip method intrusion didn't work with proxying
ok 29 - table drop
ok 30 - Test table removed
1..30
ok
t/zvxgnp_50dbm_simple.t ....
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable FreezeThaw YAML JSON
--- Using SDBM_File () ---
# DBD::DBM 0.06 using SDBM_File (1.06)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 1 - dbm_versions
ok 2 - The object isa DBI::db
ok 3 # skip Can't set attributes after connect using DBD::Gofer
ok 4 # skip Can't set attributes after connect using DBD::Gofer
ok 5
ok 6 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 7 - execute
ok 8 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 9 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 10 - execute
ok 11 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 12 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 13 - execute
ok 14 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 15 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 16 - execute
ok 17 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 18 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 19 - execute
ok 20 - INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 21 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 22 - execute
ok 23 - INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 24 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 25 - execute
ok 26 - INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 27 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 28 - execute
ok 29 - INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 30 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 31 - execute
ok 32 - INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 33 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 34 - execute
ok 35 - DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
not ok 36 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 37 - prepare UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 38 - execute
ok 39 - UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
not ok 40 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 41 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 42 - execute
ok 43 - DELETE FROM SDBM_File_fruit WHERE dKey=7
not ok 44 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 45 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 46 - execute
ok 47 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 48 - SELECT results
ok 49 - prepare DELETE FROM SDBM_File_fruit
ok 50 - execute
ok 51 - DELETE FROM SDBM_File_fruit
not ok 52 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 53 - prepare DROP TABLE SDBM_File_fruit
ok 54 - execute
ok 55 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Data::Dumper
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 56 - dbm_versions
ok 57 - The object isa DBI::db
ok 58 # skip Can't set attributes after connect using DBD::Gofer
ok 59 # skip Can't set attributes after connect using DBD::Gofer
ok 60
ok 61 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 62 - execute
ok 63 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 64 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 65 - execute
ok 66 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 67 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 68 - execute
ok 69 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 70 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 71 - execute
ok 72 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 73 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 74 - execute
ok 75 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 76 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 77 - execute
ok 78 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 79 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 80 - execute
ok 81 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 82 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 83 - execute
ok 84 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 85 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 86 - execute
ok 87 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 88 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 89 - execute
ok 90 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 91 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 92 - execute
ok 93 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 94 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 95 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 96 - execute
ok 97 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 98 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 99 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 100 - execute
ok 101 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 102 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 103 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 104 - execute
ok 105 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 106 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 107 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 108 - execute
ok 109 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 110 - SELECT results
ok 111 - prepare DELETE FROM SDBM_File_fruit
ok 112 - execute
ok 113 - DELETE FROM SDBM_File_fruit
not ok 114 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 115 - prepare DROP TABLE SDBM_File_fruit
ok 116 - execute
ok 117 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Storable
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 118 - dbm_versions
ok 119 - The object isa DBI::db
ok 120 # skip Can't set attributes after connect using DBD::Gofer
ok 121 # skip Can't set attributes after connect using DBD::Gofer
ok 122
ok 123 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 124 - execute
ok 125 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 126 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 127 - execute
ok 128 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 129 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 130 - execute
ok 131 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 132 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 133 - execute
ok 134 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 135 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 136 - execute
ok 137 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 138 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 139 - execute
ok 140 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 141 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 142 - execute
ok 143 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 144 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 145 - execute
ok 146 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 147 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 148 - execute
ok 149 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 150 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 151 - execute
ok 152 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 153 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 154 - execute
ok 155 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 156 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 157 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 158 - execute
ok 159 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 160 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 161 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 162 - execute
ok 163 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 164 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 165 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 166 - execute
ok 167 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 168 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 169 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 170 - execute
ok 171 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 172 - SELECT results
ok 173 - prepare DELETE FROM SDBM_File_fruit
ok 174 - execute
ok 175 - DELETE FROM SDBM_File_fruit
not ok 176 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 177 - prepare DROP TABLE SDBM_File_fruit
ok 178 - execute
ok 179 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (FreezeThaw) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::FreezeThaw
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 180 - dbm_versions
ok 181 - The object isa DBI::db
ok 182 # skip Can't set attributes after connect using DBD::Gofer
ok 183 # skip Can't set attributes after connect using DBD::Gofer
ok 184
ok 185 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 186 - execute
ok 187 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 188 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 189 - execute
ok 190 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 191 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 192 - execute
ok 193 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 194 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 195 - execute
ok 196 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 197 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 198 - execute
ok 199 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 200 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 201 - execute
ok 202 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 203 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 204 - execute
ok 205 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 206 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 207 - execute
ok 208 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 209 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 210 - execute
ok 211 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 212 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 213 - execute
ok 214 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 215 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 216 - execute
ok 217 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 218 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 219 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 220 - execute
ok 221 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 222 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 223 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 224 - execute
ok 225 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 226 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 227 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 228 - execute
ok 229 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 230 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 231 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 232 - execute
ok 233 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 234 - SELECT results
ok 235 - prepare DELETE FROM SDBM_File_fruit
ok 236 - execute
ok 237 - DELETE FROM SDBM_File_fruit
not ok 238 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 239 - prepare DROP TABLE SDBM_File_fruit
ok 240 - execute
ok 241 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (YAML) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::YAML (0.10)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 242 - dbm_versions
ok 243 - The object isa DBI::db
ok 244 # skip Can't set attributes after connect using DBD::Gofer
ok 245 # skip Can't set attributes after connect using DBD::Gofer
ok 246
ok 247 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 248 - execute
ok 249 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 250 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 251 - execute
ok 252 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 253 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 254 - execute
ok 255 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 256 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 257 - execute
ok 258 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 259 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 260 - execute
ok 261 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 262 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 263 - execute
ok 264 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 265 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 266 - execute
ok 267 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 268 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 269 - execute
ok 270 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 271 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 272 - execute
ok 273 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 274 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 275 - execute
ok 276 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 277 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 278 - execute
ok 279 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 280 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 281 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 282 - execute
ok 283 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 284 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 285 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 286 - execute
ok 287 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 288 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 289 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 290 - execute
ok 291 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 292 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 293 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 294 - execute
ok 295 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 296 - SELECT results
ok 297 - prepare DELETE FROM SDBM_File_fruit
ok 298 - execute
ok 299 - DELETE FROM SDBM_File_fruit
not ok 300 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 301 - prepare DROP TABLE SDBM_File_fruit
ok 302 - execute
ok 303 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (JSON) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::JSON (0.001)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 304 - dbm_versions
ok 305 - The object isa DBI::db
ok 306 # skip Can't set attributes after connect using DBD::Gofer
ok 307 # skip Can't set attributes after connect using DBD::Gofer
ok 308
ok 309 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 310 - execute
ok 311 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 312 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 313 - execute
ok 314 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 315 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 316 - execute
ok 317 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 318 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 319 - execute
ok 320 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 321 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 322 - execute
ok 323 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 324 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 325 - execute
ok 326 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 327 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 328 - execute
ok 329 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 330 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 331 - execute
ok 332 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 333 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 334 - execute
ok 335 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 336 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 337 - execute
ok 338 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 339 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 340 - execute
ok 341 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 342 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 343 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 344 - execute
ok 345 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 346 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 347 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 348 - execute
ok 349 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 350 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 351 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 352 - execute
ok 353 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 354 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 355 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 356 - execute
ok 357 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 358 - SELECT results
ok 359 - prepare DELETE FROM SDBM_File_fruit
ok 360 - execute
ok 361 - DELETE FROM SDBM_File_fruit
not ok 362 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 363 - prepare DROP TABLE SDBM_File_fruit
ok 364 - execute
ok 365 - DROP TABLE SDBM_File_fruit
1..365
ok
t/zvxgnp_51dbm_file.t ......
ok 1 - drop table
ok 2 - FRED.dir exists
ok 3 - fred.dir exists
ok 4 - insert into mixed case table
ok 5 - insert into uppercase table
ok 6 - rows found via mixed case table
ok 7 # skip quoted identifiers aren't supported by DBI::SQL::Nano
ok 8 - drop table
1..8
ok
t/zvxgnp_52dbm_complex.t ... skipped: Not running with SQL::Statement
t/zvxgnp_85gofer.t .........
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4620;dbm_type=SDBM_File;f_lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4620;dbm_type=SDBM_File;f_lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x40db5f0)
ok 20 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 21 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 22 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4620;dbm_type=SDBM_File;f_lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4620;dbm_type=SDBM_File;f_lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x40ee6c0)
ok 46 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 47 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 48 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4620;dbm_type=SDBM_File;f_lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4620;dbm_type=SDBM_File;f_lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x40f5d80)
ok 72 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 73 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 74 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
1..78
ok
t/zvxgp_01basics.t .........
1..130
ok 1 - use DBI;
ok 2 - ... testing sql_type
ok 3 - ... testing sql_type
ok 4 - ... testing sql_type
ok 5 - ... testing sql_type
ok 6 - ... testing sql_type
ok 7 - ... testing sql_type
ok 8 - ... testing sql_type
ok 9 - ... testing sql_type
ok 10 - ... testing sql_type
ok 11 - ... testing sql_type
ok 12 - ... testing sql_type
ok 13 - ... testing sql_type
ok 14 - ... testing sql_type
ok 15 - ... testing sql_type
ok 16 - ... testing sql_type
ok 17 - ... testing sql_type
ok 18 - ... testing sql_type
ok 19 - ... testing sql_type
ok 20 - ... testing sql_type
ok 21 - ... testing sql_type
ok 22 - ... testing sql_type
ok 23 - ... testing sql_type
ok 24 - ... testing sql_type
ok 25 - ... testing sql_type
ok 26 - ... testing sql_type
ok 27 - ... testing sql_type
ok 28 - ... testing sql_type
ok 29 - ... testing sql_type
ok 30 - ... testing sql_type
ok 31 - ... testing sql_type
ok 32 - ... testing sql_type
ok 33 - ... testing sql_type
ok 34 - ... testing sql_type
ok 35 - ... testing sql_type
ok 36 - ... testing sql_type
ok 37 - ... testing sql_type
ok 38 - ... testing sql_type
ok 39 - ... testing sql_type
ok 40 - ... testing sql_type
ok 41 - ... testing sql_type
ok 42 - ... testing sql_type
ok 43 - ... testing sql_type
ok 44 - ... testing sql_type
ok 45 - ... testing sql_type
ok 46 - ... testing sql_type
ok 47 - ... testing sql_type
ok 48 - ... testing sql_type
ok 49 - ... testing sql_type
ok 50 - ... testing sql_type
ok 51 - ... testing sql_type
ok 52 - ... testing sql_type
ok 53 - ... testing sql_type
ok 54 - ... testing sql_type
ok 55 - ... testing sql_type
ok 56 - ... testing sql_type
ok 57 - ... testing sql_type
ok 58 - ... testing sql_type
ok 59 - ... testing sql_type
ok 60 - ... testing sql_cursor_types
ok 61 - ... testing sql_cursor_types
ok 62 - ... testing sql_cursor_types
ok 63 - ... testing sql_cursor_types
ok 64 - ... testing sql_cursor_types
ok 65 - ... looks_like_number : undef -> undef
ok 66 - ... looks_like_number : "" -> undef (eg "don't know")
ok 67 - ... looks_like_number : "foo" -> defined false
ok 68 - ... looks_like_number : "foo" -> defined false
ok 69 - ... looks_like_number : 1 -> true
ok 70 - ... looks_like_number : "." -> false
ok 71 - ... looks_like_number : 1 -> true
ok 72 - ... looks_like_number : 1 -> true
ok 73 - ... 1000 initial state is 400
ok 74 - ... neat : 1 + 1 -> "2"
ok 75 - ... neat : 2 -> "'2'"
ok 76 - ... neat : undef -> "undef"
ok 77 - ... test array argument w/seperator and maxlen
ok 78 - ... test array argument w/out seperator or maxlen
ok 79 - The object isa DBI::dr
ok 80 - ... test debug
ok 81 - ... test DebugDispatch
ok 82 - ... test Warn
ok 83 - ... this should say Tim Bunce
ok 84 - ... the version should match DBI version
ok 85 - ... this should work and return 1
ok 86 - ... this should equal 1
ok 87 - ... CachedKids should be undef initially
ok 88 - ... CachedKids should be our ref
ok 89 - ... this should be zero
ok 90 - ... this should be zero
ok 91 - ... Active flag is true
ok 92 - ... we should get a warning here
ok 93 - ... we should get a warning here
ok 94 - ... we should get no warnings here
ok 95 - ... we at least have one driver installed
ok 96 - ... we should at least have ExampleP installed
ok 97 - ... we should at least have one driver
ok 98 - ... should be -1077531989
ok 99 - ... should be -1077531989
ok 100 - ... should be -1077531990
ok 101 # skip Seems like your Math::BigInt 1.89 has a bug
ok 102 # skip Seems like your Math::BigInt 1.89 has a bug
ok 103
ok 104
ok 105
ok 106
ok 107
ok 108
ok 109
ok 110
ok 111
ok 112
ok 113
ok 114
ok 115
ok 116
ok 117
ok 118
ok 119
ok 120
ok 121
ok 122
ok 123
ok 124 # skip developer tests
ok 125 # skip developer tests
ok 126 # skip developer tests
ok 127 # skip developer tests
ok 128 - ... DBI::dbi_debug's initial state is 0
ok 129 - ... DBI::dbi_debug is 15
ok 130 - ... DBI::dbi_debug is 0
ok
t/zvxgp_02dbidrv.t .........
1..53
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - ... DBD::Test->driver called to getnew Driver handle
ok 5 - ... new Driver handle (DBI::dr=HASH(0x2d3bf50)) created successfully
ok 6 - The object isa DBI::dr
ok 7 - ... got a Test Driver object back from DBI->install_driver
ok 8 - The object isa DBI::dr
ok 9 - ... checking the DBI::_get_imp_data function
ok 10 - ... Driver object passed to data_sources
ok 11 - The object isa DBI::dr
ok 12 - ... Driver object is not tied
ok 13 - ... got correct datasources from DBI->data_sources("Test")
ok 14 # skip Kids attribute not supported under DBI::PurePerl
ok 15 - ... got a database handle from calling $drh->connect
ok 16 - The object isa DBI::db
ok 17 # skip Kids attribute not supported under DBI::PurePerl
ok 18 - ... Driver object passed to data_sources
ok 19 - The object isa DBI::dr
ok 20 - ... Driver object is not tied
ok 21 - ... checking fetched datasources from Driver
ok 22 - ... got correct datasources from $dbh->data_sources()
ok 23 - ... Database object passed to do
ok 24 - The object isa DBI::db
ok 25 - ... Database object is not tied
ok 26 - ... got Driver object from Database object with Driver attribute
ok 27 - The object isa DBI::dr
ok 28 - ... Driver object is not tied
ok 29 - ... got Driver object from Database object by FETCH-ing Driver attribute
ok 30 - The object isa DBI::dr
ok 31 # skip running DBI::PurePerl
ok 32 - ... this will trigger more driver internal tests above in DBD::Test::db
ok 33 - ... checking Driver handle err set with set_err method
ok 34 - ... checking Database handle err set with set_err method
ok 35 - ... checking Database handle err set with Driver handle set_err method
ok 36 # skip Kids attribute not supported under DBI::PurePerl
ok 37 - ... $dbh->DESTROY should set $drh->err to 42
ok 38 - ... checking $DBI::err set with Driver handle set_err method
ok 39 - ... checking $DBI::errstr
ok 40 - ... checking $DBI::state
ok 41 - ... checking $DBI::state
ok 42 - ... checking $DBI::state
ok 43 # skip using DBI::PurePerl
ok 44 - ... FetchHashKeyName is NAME
ok 45 - ... FetchHashKeyName is now changed to NAME_lc
ok 46 - ... calling $drh->disconnect_all (not implemented but will fail silently)
ok 47 - has dbixs_revision
ok 48 - has integer dbixs_revision
ok 49 # skip using DBI::PurePerl
ok 50 # skip using DBI::PurePerl
ok 51 # skip using DBI::PurePerl
ok 52 # skip using DBI::PurePerl
ok 53 # skip using DBI::PurePerl
ok
t/zvxgp_03handle.t .........
1..137
ok 1 - use DBI;
ok 2
ok 3 - The object isa DBI::dr
ok 4 # skip Kids attribute not supported under DBI::PurePerl
ok 5
ok 6
ok 7
ok 8 - The object isa DBI::db
ok 9 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 10 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 11 - The object isa DBI::st
ok 12 - ... execute ran successfully
ok 13 - ... we got the CachedKids hash
ok 14 - ... there is one CachedKid
ok 15 - ... our statment handle should be in the CachedKids
ok 16 - ... our first statment is Active
ok 17 - The object isa DBI::st
ok 18 - ... prepare_cached returned the same statement handle
ok 19 - ... we got warned about our first statement handle being still active
ok 20 - ... our first statment is no longer Active since we re-prepared it
ok 21 - The object isa DBI::st
ok 22 - ... prepare_cached returned a different statement handle now
ok 23 - ... there are two CachedKids
ok 24 - ... both statment handles should be in the CachedKids
ok 25 - ... executing first statement handle again
ok 26 - ... first statement handle is now active again
ok 27 - The object isa DBI::st
ok 28 - ... our fourth statement handle is not the same as our first
ok 29 - ... first statement handle is still active
ok 30 - ... there are two CachedKids
ok 31 - ... second and fourth statment handles should be in the CachedKids
ok 32 - ... first statement handle is no longer active
ok 33 - ... fourth statement handle executed properly
ok 34 - ... fourth statement handle is Active
ok 35 - The object isa DBI::st
ok 36 - ... we still only got one warning
ok 37 - ... fourth statement handle and fifth one match
ok 38 - ... fourth statement handle is not Active
ok 39 - ... fifth statement handle is not Active (shouldnt be its the same as fifth)
ok 40 - ... there are two CachedKids
ok 41 - ... second and fourth/fifth statment handles should be in the CachedKids
ok 42 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 43 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 44 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 45 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 46 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 47 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 48 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 49 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 50 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 51 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 52 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 53 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 54 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 55 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 56 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 57 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 58 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 59 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 60 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 61 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 62 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 63 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 64 # skip swap_inner_handle() not supported under DBI::PurePerl
ok 65 - ping should be true before disconnect
ok 66 - ping should be false after disconnect
ok 67 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 68 # skip Kids and ActiveKids attributes not supported under DBI::PurePerl
ok 69 # skip Kids attribute not supported under DBI::PurePerl
ok 70 # skip Kids attribute not supported under DBI::PurePerl
ok 71 # skip Kids attribute not supported under DBI::PurePerl
ok 72 # skip Kids attribute not supported under DBI::PurePerl
ok 73 # skip Kids attribute not supported under DBI::PurePerl
ok 74 # skip Kids attribute not supported under DBI::PurePerl
ok 75 # skip Kids attribute not supported under DBI::PurePerl
ok 76 # skip Kids attribute not supported under DBI::PurePerl
ok 77 # skip Kids attribute not supported under DBI::PurePerl
ok 78 # skip Kids attribute not supported under DBI::PurePerl
ok 79 # skip Kids attribute not supported under DBI::PurePerl
ok 80 # skip Kids attribute not supported under DBI::PurePerl
ok 81 # skip Kids attribute not supported under DBI::PurePerl
ok 82 # skip Kids attribute not supported under DBI::PurePerl
ok 83 # skip Kids attribute not supported under DBI::PurePerl
ok 84 # skip Kids attribute not supported under DBI::PurePerl
ok 85 # skip Kids attribute not supported under DBI::PurePerl
ok 86 # skip Kids attribute not supported under DBI::PurePerl
ok 87 # skip Kids attribute not supported under DBI::PurePerl
ok 88 # skip Kids attribute not supported under DBI::PurePerl
ok 89 # skip Kids attribute not supported under DBI::PurePerl
ok 90 # skip Kids attribute not supported under DBI::PurePerl
ok 91 # skip Kids attribute not supported under DBI::PurePerl
ok 92 # skip Kids attribute not supported under DBI::PurePerl
ok 93 # skip Kids attribute not supported under DBI::PurePerl
ok 94 # skip Kids attribute not supported under DBI::PurePerl
ok 95 # skip take_imp_data test not supported under DBD::Gofer
ok 96 # skip take_imp_data test not supported under DBD::Gofer
ok 97 # skip take_imp_data test not supported under DBD::Gofer
ok 98 # skip take_imp_data test not supported under DBD::Gofer
ok 99 # skip take_imp_data test not supported under DBD::Gofer
ok 100 # skip take_imp_data test not supported under DBD::Gofer
ok 101 # skip take_imp_data test not supported under DBD::Gofer
ok 102 # skip take_imp_data test not supported under DBD::Gofer
ok 103 # skip take_imp_data test not supported under DBD::Gofer
ok 104 # skip take_imp_data test not supported under DBD::Gofer
ok 105 # skip take_imp_data test not supported under DBD::Gofer
ok 106 # skip take_imp_data test not supported under DBD::Gofer
ok 107 # skip take_imp_data test not supported under DBD::Gofer
ok 108 # skip take_imp_data test not supported under DBD::Gofer
ok 109 # skip take_imp_data test not supported under DBD::Gofer
ok 110 # skip take_imp_data test not supported under DBD::Gofer
ok 111 # skip take_imp_data test not supported under DBD::Gofer
ok 112 # skip take_imp_data test not supported under DBD::Gofer
ok 113 # skip take_imp_data test not supported under DBD::Gofer
ok 114 # skip Kids attribute not supported under DBI::PurePerl
ok 115 - The object isa DBI::dr
ok 116 # skip Kids attribute not supported under DBI::PurePerl
ok 117 - The object isa DBI::db
ok 118 - The object isa DBI::st
ok 119 - ... NUM_OF_PARAMS is 0
ok 120 - ... NUM_OF_FIELDS should be undef
ok 121 - ... Statement is "foo bar"
ok 122 - ... NAME is undefined
ok 123 - ... TYPE is undefined
ok 124 - ... SCALE is undefined
ok 125 - ... PRECISION is undefined
ok 126 - ... NULLABLE is undefined
ok 127 - ... RowsInCache is undefined
ok 128 - ... ParamValues is undefined
ok 129 - ... NAME_uc is undefined
ok 130 - ... NAME_lc is undefined
ok 131 - ... NAME_hash is undefined
ok 132 - ... NAME_uc_hash is undefined
ok 133 - ... NAME_lc_hash is undefined
ok 134 - ... $dbh can call "prepare"
ok 135 - ... $dbh cannot call "nonesuch"
ok 136 - ... $sth can call "execute"
ok 137 # skip Kids attribute not supported under DBI::PurePerl
ok
t/zvxgp_04mods.t ...........
1..12
ok 1 - use DBI;
ok 2 - use DBI::Const::GetInfo::ANSI;
ok 3 - use DBI::Const::GetInfo::ODBC;
ok 4 - use DBI::Const::GetInfoType;
ok 5 - use DBI::Const::GetInfoReturn;
ok 6 - ... we have at least one key in the GetInfoType hash
ok 7 - ... the GetInfoType hash is constructed from the ANSI and ODBC hashes
ok 8 - ... we have at least one key in the GetInfoReturnType hash
ok 9 - ... the GetInfoReturnType hash is constructed from the ANSI and ODBC hashes
ok 10 - ... we have at least one key in the GetInfoReturnValues hash
ok 11 - DBI::Const::GetInfoReturn->can('Format')
ok 12 - DBI::Const::GetInfoReturn->can('Explain')
ok
t/zvxgp_05concathash.t .....
1..41
ok 1 - use DBI;
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9 - should work with nul bytes in kv_sep and pair_sep
ok 10 - should work with nul bytes in hash value (neat)
ok 11 - should work with nul bytes in hash value (not neat)
ok 12
ok 13
ok 14
ok 15 - test
ok 16 - test
ok 17 - Unknown sort order
ok 18 - Float Hash - Not Neat lexical
ok 19 - Numeric - Not Neat lexical
ok 20 - Mixed Hash - Not Neat lexical
ok 21 - Simple Hash - Not Neat lexical
ok 22 - Float Hash - Neat lexical
ok 23 - Numeric - Neat lexical
ok 24 - Mixed Hash - Neat lexical
ok 25 - Simple Hash - Neat lexical
ok 26 - Float Hash - Not Neat guess
ok 27 - Numeric - Not Neat guess
ok 28 - Mixed Hash - Not Neat guess
ok 29 - Simple Hash - Not Neat guess
ok 30 - Float Hash - Neat guess
ok 31 - Numeric - Neat guess
ok 32 - Mixed Hash - Neat guess
ok 33 - Simple Hash - Neat guess
ok 34 - Float Hash - Not Neat numeric
ok 35 - Numeric - Not Neat numeric
ok 36 - Mixed Hash - Not Neat numeric
ok 37 - Simple Hash - Not Neat numeric
ok 38 - Float Hash - Neat numeric
ok 39 - Numeric - Neat numeric
ok 40 - Mixed Hash - Neat numeric
ok 41 - Simple Hash - Neat numeric
ok
t/zvxgp_06attrs.t ..........
1..148
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking Warn attribute for dbh
ok 4 - ... checking Active attribute for dbh
ok 5 - ... checking AutoCommit attribute for dbh
ok 6 - ... checking CompatMode attribute for dbh
ok 7 - ... checking InactiveDestory attribute for dbh
ok 8 - ... checking AutoInactiveDestory attribute for dbh
ok 9 - ... checking PrintError attribute for dbh
ok 10 - ... checking PrintWarn attribute for dbh
ok 11 - ... checking RaiseError attribute for dbh
ok 12 - ... checking ShowErrorStatement attribute for dbh
ok 13 - ... checking ChopBlanks attribute for dbh
ok 14 - ... checking LongTrunkOk attribute for dbh
ok 15 - ... checking TaintIn attribute for dbh
ok 16 - ... checking TaintOut attribute for dbh
ok 17 - ... checking Taint attribute for dbh
ok 18 - ... checking Executed attribute for dbh
ok 19 - ... checking ErrCount attribute for dbh
ok 20 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 21 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 22 - ... checking CachedKids attribute for dbh
ok 23 - ... checking HandleError attribute for dbh
ok 24 - ... checking Profile attribute for dbh
ok 25 - ... checking Statement attribute for dbh
ok 26 - ... checking RowCacheSize attribute for dbh
ok 27 - ... checking ReadOnly attribute for dbh
ok 28 - ... checking FetchHashKeyName attribute for dbh
ok 29
ok 30 - ... checking TraceLevel attribute for dbh
ok 31 - ... checking LongReadLen attribute for dbh
ok 32 - should be able to FETCH_many
ok 33 - should see driver-private dbh attribute value
ok 34 - ... catching exception
ok 35 - ... $dbh->err is undefined
ok 36 - ... checking $dbh->errstr
ok 37 - ... checking $dbh->state
ok 38 - ... checking Executed attribute for dbh
ok 39 - ... checking Executed attribute for dbh (after reset)
ok 40 - ... checking ErrCount attribute for dbh (after error was generated)
ok 41 - The object isa DBI::dr
ok 42 - ... checking $dbh->err
ok 43 - ... checking ErrCount attribute for drh
ok 44 - ... checking Warn attribute for drh
ok 45 - ... checking Active attribute for drh
ok 46 - ... checking AutoCommit attribute for drh
ok 47 - ... checking CompatMode attribute for drh
ok 48 - ... checking InactiveDestory attribute for drh
ok 49 - ... checking AutoInactiveDestory attribute for drh
ok 50 - ... checking PrintError attribute for drh
ok 51 - ... checking PrintWarn attribute for drh
ok 52 - ... checking RaiseError attribute for drh
ok 53 - ... checking ShowErrorStatement attribute for drh
ok 54 - ... checking ChopBlanks attribute for drh
ok 55 - ... checking LongTrunkOk attribute for drh
ok 56 - ... checking TaintIn attribute for drh
ok 57 - ... checking TaintOut attribute for drh
ok 58 - ... checking Taint attribute for drh
ok 59 # skip Executed attribute not supported under DBI::PurePerl
ok 60 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 61 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 62 - ... checking CachedKids attribute for drh
ok 63 - ... checking HandleError attribute for drh
ok 64 - ... checking Profile attribute for drh
ok 65 - ... checking ReadOnly attribute for drh
ok 66 - ... checking TraceLevel attribute for drh
ok 67 - ... checking LongReadLen attribute for drh
ok 68 - ... checking FetchHashKeyName attribute for drh
ok 69
ok 70 - The object isa DBI::st
ok 71 - ... checking Executed attribute for sth
ok 72 - ... checking Executed attribute for dbh
ok 73 - ... checking ErrCount attribute for sth
ok 74 - ... checking exception
ok 75 - ... checking $sth->errstr
ok 76 - ... checking $sth->state
ok 77 - ... checking Executed attribute for sth
ok 78 - ... checking Exceuted attribute for dbh
ok 79 - ... checking ErrCount attribute for sth
ok 80 - ... checking exception
ok 81 - ... checking ErrCount attribute for sth (after assignment)
ok 82 - ... checking ErrCount attribute for sth (after reset)
ok 83 - ... checking Warn attribute for sth
ok 84 - ... checking Active attribute for sth
ok 85 - ... checking CompatMode attribute for sth
ok 86 - ... checking InactiveDestroy attribute for sth
ok 87 - ... checking AutoInactiveDestroy attribute for sth
ok 88 - ... checking PrintError attribute for sth
ok 89 - ... checking PrintWarn attribute for sth
ok 90 - ... checking RaiseError attribute for sth
ok 91 - ... checking ShowErrorStatement attribute for sth
ok 92 - ... checking ChopBlanks attribute for sth
ok 93 - ... checking LongTrunkOk attribute for sth
ok 94 - ... checking TaintIn attribute for sth
ok 95 - ... checking TaintOut attribute for sth
ok 96 - ... checking Taint attribute for sth
ok 97 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 98 # skip Kids and ActiveKids attribute not supported under DBI::PurePerl
ok 99 - ... checking CachedKids attribute for sth
ok 100 - ... checking HandleError attribute for sth
ok 101 - ... checking Profile attribute for sth
ok 102 - ... checking ReadOnly attribute for sth
ok 103 - ... checking TraceLevel attribute for sth
ok 104 - ... checking LongReadLen attribute for sth
ok 105 - ... checking FetchHashKeyName attribute for sth
ok 106 - ... checking CursorName attribute for sth
ok 107 - ... checking NUM_OF_FIELDS attribute for sth
ok 108 - ... checking NUM_OF_PARAMS attribute for sth
ok 109 - ... checking type of NAME attribute for sth
ok 110 - ... checking number of elements returned
ok 111 - ... checking values returned
ok 112 - ... checking type of NAME_lc attribute for sth
ok 113 - ... checking number of elements returned
ok 114 - ... checking values returned
ok 115 - ... checking type of NAME_uc attribute for sth
ok 116 - ... checking number of elements returned
ok 117 - ... checking values returned
ok 118 - ... checking type of NAME_hash attribute for sth
ok 119 - ... checking number of keys returned
ok 120 - ... checking values returned
ok 121 - ... checking values returned
ok 122 - ... checking type of NAME_lc_hash attribute for sth
ok 123 - ... checking number of keys returned
ok 124 - ... checking values returned
ok 125 - ... checking values returned
ok 126 - ... checking type of NAME_uc_hash attribute for sth
ok 127 - ... checking number of keys returned
ok 128 - ... checking values returned
ok 129 - ... checking values returned
ok 130 - ... checking type of TYPE attribute for sth
ok 131 - ... checking number of elements returned
ok 132 - ... checking values returned
ok 133 - ... checking type of NULLABLE attribute for sth
ok 134 - ... checking number of elements returned
ok 135 - ... checking values returned
ok 136 - ... checking type of PRECISION attribute for sth
ok 137 - ... checking number of elements returned
ok 138 - ... checking values returned
ok 139 - ... checking type of SCALE attribute for sth
ok 140 - ... checking number of elements returned
ok 141 - ... checking values returned
ok 142 - ... checking type of ParamValues attribute for sth
ok 143 - ... checking values returned
ok 144 - ... checking Statement attribute for sth
ok 145 - ... checking type of RowsInCache attribute for sth
ok 146 - should see driver-private sth attribute value
# Checking inheritance
ok 147 # skip drh->dbh->sth inheritance test skipped with DBI_AUTOPROXY
ok 148 # skip drh->dbh->sth inheritance test skipped with DBI_AUTOPROXY
ok
t/zvxgp_07kids.t ........... skipped: $h->{Kids} attribute not supported for DBI::PurePerl
t/zvxgp_08keeperr.t ........
1..69
ok 1 - use DBI;
ok 2 - ... checking error
ok 3 - ... checking error
Test HandleSetErr
ok 4 - The object isa DBI::db
ok 5 - ... $DBI::err is not defined
HandleSetErr called: h=DBI::db=HASH(0x37c0438), err=, errstr=(got info), state=
ok 6 - ... $DBI::err is defined
ok 7 - ... $DBI::err is an empty string
ok 8 - ... $DBI::errstr is as we expected
ok 9 - ... $dbh->errstr matches $DBI::errstr
ok 10 - ... $warn{failed} is 0
ok 11 - ... $warn{warning} is 0
ok 12 - ... the @handlewarn array is (1, 0, 0)
HandleSetErr called: h=DBI::db=HASH(0x37c0438), err=0, errstr=(got warn), state=AA001
warn: 'DBD::Gofer::db set_err warning: (got info)\n(got warn) at ./t/08keeperr.t line 131\n'
ok 13 - ... $DBI::err is defined
ok 14 - ... $DBI::err is "0"
ok 15 - ... $DBI::errstr is as we expected
ok 16 - ... $dbh->errstr matches $DBI::errstr
ok 17 - ... $DBI::state is AA001
ok 18 - ... $warn{warning} is 1
ok 19 - ... the @handlewarn array is (1, 1, 0)
HandleSetErr called: h=DBI::db=HASH(0x37c0438), err=, errstr=(got more info), state=
warn: 'DBD::Gofer::db set_err warning: (got info)\n(got warn)\n(got more info) at ./t/08keeperr.t line 146\n'
ok 20 - ... $DBI::err is defined
ok 21 - ... $DBI::err is "0"
ok 22 - ... $dbh->err is "0"
ok 23 - ... $DBI::state is AA001
ok 24 - ... $DBI::errstr is as we expected
ok 25 - ... $dbh->errstr matches $DBI::errstr
ok 26 - ... $warn{warning} is 2
ok 27 - ... the @handlewarn array is (2, 1, 0)
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error) at ./t/08keeperr.t line 167\n'
ok 28 - ... $DBI::err is defined
ok 29 - ... $DBI::err is 42
ok 30 - ... $warn{warning} is 2
ok 31 - ... $dbh->errstr is as we expected
ok 32 - ... $DBI::state is AA002
ok 33 - ... the @handlewarn array is (2, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x37c0438), err=, errstr=(got info), state=
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info) at ./t/08keeperr.t line 179\n'
ok 34 - ... $DBI::err is defined
ok 35 - ... $DBI::err is 42
ok 36 - ... $warn{warning} is 2
ok 37 - ... $dbh->errstr is as we expected
ok 38 - ... the @handlewarn array is (3, 1, 1)
HandleSetErr called: h=DBI::db=HASH(0x37c0438), err=0, errstr=(got warn), state=
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) at ./t/08keeperr.t line 190\n'
ok 39 - ... $DBI::err is defined
ok 40 - ... $DBI::err is 42
ok 41 - ... $warn{warning} is 2
ok 42 - ... $dbh->errstr is as we expected
ok 43 - ... the @handlewarn array is (3, 2, 1)
warn: 'DBD::Gofer::db set_err failed: (got info)\n(got warn)\n(got more info) [state was AA001 now AA002]\n(got error)\n(got info)\n(got warn) [err was 42 now 4200] [state was AA002 now AA003]\n(got new error) at ./t/08keeperr.t line 201\n'
ok 44 - ... $DBI::err is defined
ok 45 - ... $DBI::err is 4200
ok 46 - ... $warn{warning} is 2
ok 47 - ... $dbh->errstr is as we expected
ok 48 - ... the @handlewarn array is (3, 2, 2)
ok 49 - ... $dbh->errstr is defined
ok 50 - ... $dbh->err is defined
ok 51 - ... $dbh->state is an empty string
warn: 'DBD::Gofer::db set_err failed: foo at ./t/08keeperr.t line 226\n'
ok 52 - ... only returned one value
ok 53 - ... the first value is undefined
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar at ./t/08keeperr.t line 230\n'
ok 54 - ... $dbh->set_err returned undefiend
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz at ./t/08keeperr.t line 231\n'
ok 55 - ... $dbh->set_err returned undefiend
HandleSetErr called: h=DBI::db=HASH(0x37c0438), err=0, errstr=warn, state=
warn: 'DBD::Gofer::db set_err failed: foo [err was 1 now 2]\nbar [err was 2 now 3]\nbaz\nwarn at ./t/08keeperr.t line 232\n'
ok 56 - ... $dbh->set_err returned undefiend
ok 57 - ... $dbh->errstr is as we expected
ok 58 - ... $warn{failed} is 4
ok 59 - ... the @handlewarn array is (0, 1, 3)
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 242\n'
ok 60 - ... only returned one value
ok 61 - ... the first value is undefined
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 246\n'
ok 62 - ... only returned one value
ok 63 - ... the first value is "42"
warn: 'DBD::Gofer::db method failed: foo at ./t/08keeperr.t line 250\n'
ok 64 - ... returned no values
HandleSetErr called: h=DBI::db=HASH(0x37c0438), err=, errstr=info, state=override
warn: 'DBD::Gofer::db set_err failed: errstr99 at ./t/08keeperr.t line 257\n'
ok 65 - ... only returned one value
ok 66 - ... the first value is undefined
ok 67 - ... $dbh->err is 99
ok 68 - ... $dbh->errstr is as we expected
ok 69 - ... $dbh->state is as we expected
ok
t/zvxgp_09trace.t ..........
1..67
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - trace file size = 11452
ok 4 - ... checking TraceLevel attribute
ok 5 - ... trace file successfully created
parse_trace_flag SQL
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
parse_trace_flag foo
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
parse_trace_flag bar
ok 22
ok 23
ok 24
ok 25
ok 26
ok 27
ok 28
ok 29
parse_trace_flag baz
ok 30
ok 31
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
parse_trace_flag boo
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
parse_trace_flag bop
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53
parse_trace_flag SQL foo bar baz boo bop
ok 54 - ...
ok 55 - ...
inherit
ok 56 - The object isa DBI::st
ok 57
ok 58
ok 59
test unknown parse_trace_flag
ok 60
ok 61
caught warn: DBI::db=HASH(0x3aa7aa8)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at DBI::PurePerl DBI::common::parse_trace_flags line 49
ok 62
ok 63
caught warn: DBI::db=HASH(0x3c98e20)->parse_trace_flags(nonesuch|SQL|nonesuch2) ignored unknown trace flags: 'nonesuch' 'nonesuch2' at DBI::PurePerl DBI::common::parse_trace_flags line 49
ok 64
ok 65
ok 66
ok 67
ok
t/zvxgp_10examp.t ..........
1..210
ok 1 - connect should fail
ok 2 - ... we should have an exception here
ok 3 - ... $dbh2 should not be defined
ok 4
ok 5
ok 6 - ... these 2 handles are cached, so they are the same
ok 7
ok 8 - ... this handle was created with different parameters, so it is not the same
ok 9
ok 10 - Executed should be true
ok 11
ok 12 - should return same handle
ok 13 - Executed should be false because reset by connect attributes
ok 14 - The object isa DBI::dr
ok 15 - ... these are our cached kids
ok 16 - ... we have emptied out cache
ok 17
ok 18 - ... PrintError should be 0
ok 19 - ... FetchHashKey is NAME
ok 20 - ... checking the example driver_path
others
ok 21
ok 22 - ping should return true
ok 23 - prepare should fail
ok 24 - sth->err should be true
ok 25 - DBI::err should be true
ok 26 - $DBI::err should match $dbh->err
ok 27 - $DBI::errstr should contain error string
ok 28 - $DBI::errstr should match $dbh->errstr
ok 29
ok 30
ok 31
ok 32 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 33 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 34 # skip inner/outer handles not fully supported for DBI::PurePerl
ok 35
ok 36
ok 37
ok 38
ok 39
ok 40
ok 41
ok 42
ok 43
ok 44
ok 45
ok 46
ok 47
ok 48
ok 49
ok 50
ok 51
ok 52
ok 53 - errstr should contain error message
ok 54
ok 55 - errstr should contain error message
ok 56
ok 57
ok 58 - errstr should contain error message
ok 59
ok 60 - errstr should contain error message
ok 61
ok 62
ok 63
ok 64
ok 65
ok 66
ok 67
ok 68
fetchrow_hashref('NAME_uc')
ok 69
ok 70
ok 71
ok 72
ok 73
fetchrow_hashref('ParamValues')
ok 74
ok 75
FetchHashKeyName
ok 76
ok 77
ok 78
ok 79
ok 80
ok 81
fetchall_arrayref
ok 82
ok 83
ok 84
ok 85
ok 86
ok 87
fetchall_arrayref array slice
ok 88
ok 89
ok 90
ok 91
fetchall_arrayref hash slice
ok 92
ok 93
ok 94
ok 95
fetchall_arrayref hash
ok 96
ok 97
ok 98
ok 99 - '16895 0 .' ne '16895 0 .'
rows()
ok 100 - row count 3
ok 101 - 3 vs 3
ok 102 - 3 vs 3
fetchall_arrayref array slice and max rows
ok 103
ok 104
ok 105
selectrow_array
ok 106
ok 107
selectrow_hashref
ok 108
ok 109
ok 110
ok 111
selectall_arrayref
ok 112
ok 113
ok 114
ok 115
selectall_arrayref Slice array slice
ok 116
ok 117
ok 118 - ". 16895" eq ". 16895"
ok 119
selectall_arrayref Columns array slice
ok 120
ok 121
ok 122 - ". 16895" eq ". 16895"
ok 123
selectall_arrayref hash slice
ok 124
ok 125
ok 126
ok 127
ok 128
ok 129
ok 130
selectall_hashref
ok 131 - selectall_hashref result
ok 132 - selectall_hashref HASH: HASH
ok 133
ok 134 - 0 eq 0
selectall_hashref by column number
ok 135
ok 136 - 0 eq 0
selectcol_arrayref
ok 137
ok 138
ok 139
selectcol_arrayref column slice
ok 140
ok 141
ok 142
ok 143
others...
ok 144
ok 145
RaiseError & PrintError & ShowErrorStatement
ok 146
ok 147
ok 148
ok 149
ok 150
ok 151
ok 152
ok 153
ok 154
ok 155
ok 156
ok 157
ok 158
ok 159
ok 160
ok 161 - DBD::Gofer::st execute failed: 2 values bound when 1 expected; DBD::ExampleP::st execute failed at DBI::PurePerl DBI::st::execute line 118. [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at DBI::PurePerl DBI::st::execute line 118.
#
ok 162 - DBD::Gofer::st execute failed: 2 values bound when 1 expected; DBD::ExampleP::st execute failed at DBI::PurePerl DBI::st::execute line 118. [for Statement "select mode from ?" with ParamValues: 1='first', 2='second'] at DBI::PurePerl DBI::st::execute line 118.
#
ok 163
ok 164
ok 165
ok 166
ok 167
ok 168
HandleError
ok 169
ok 170
HandleError -> die
ok 171
ok 172 - HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. [h=DBI::db=HASH(0x3909d30), rv=undef, \#=3] at ./t/10examp.t line 397.
#
HandleError -> 0 -> RaiseError
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. [h=DBI::db=HASH(0x3909d30), rv=undef, #=3]
ok 173
ok 174 - DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. at DBI::PurePerl DBI::db::prepare line 116.
#
HandleError -> 1 -> return (original)undef
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. [h=DBI::db=HASH(0x3909d30), rv=undef, #=3]
ok 175 -
ok 176
HandleError -> 2 -> return (modified)42
HandleError: DBD::Gofer::db prepare failed: Unknown field names: unknown_field_name2; DBD::ExampleP::db prepare failed at DBI::PurePerl DBI::db::prepare line 116. [h=DBI::db=HASH(0x3909d30), rv=undef, #=3]
ok 177 -
ok 178
ok 179
ok 180 - The object isa DBI::st
ok 181
ok 182
ok 183
ok 184 - Remove dumpcsr.tst
ok 185 - Actually gone
# table_info
ok 186
# Local blib/lib subdirs: DBD auto .. . Bundle Win32 DBI
ok 187
ok 188
ok 189
# tables
ok 190 - Table count mismatch5 vs 5
ok 191 - "schema"."table" ne "schema"."table"
ok 192 - "sch-ema"."table" ne "sch-ema"."table"
ok 193 - "schema"."ta-ble" ne "schema"."ta-ble"
ok 194 - "sch ema"."table" ne "sch ema"."table"
ok 195 - "schema"."ta ble" ne "schema"."ta ble"
# Testing the fake directories (0).
ok 196
ok 197
ok 198 - 0 rows instead of 0
ok 199
# Testing the fake directories (100).
ok 200
ok 201
ok 202 - 100 rows instead of 100
ok 203 - 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
# Testing the fake directories (200).
ok 204
ok 205
ok 206 - 200 rows instead of 200
ok 207 - 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1' ne 'file200 file199 file198 file197 file196 file195 file194 file193 file192 file191 file190 file189 file188 file187 file186 file185 file184 file183 file182 file181 file180 file179 file178 file177 file176 file175 file174 file173 file172 file171 file170 file169 file168 file167 file166 file165 file164 file163 file162 file161 file160 file159 file158 file157 file156 file155 file154 file153 file152 file151 file150 file149 file148 file147 file146 file145 file144 file143 file142 file141 file140 file139 file138 file137 file136 file135 file134 file133 file132 file131 file130 file129 file128 file127 file126 file125 file124 file123 file122 file121 file120 file119 file118 file117 file116 file115 file114 file113 file112 file111 file110 file109 file108 file107 file106 file105 file104 file103 file102 file101 file100 file99 file98 file97 file96 file95 file94 file93 file92 file91 file90 file89 file88 file87 file86 file85 file84 file83 file82 file81 file80 file79 file78 file77 file76 file75 file74 file73 file72 file71 file70 file69 file68 file67 file66 file65 file64 file63 file62 file61 file60 file59 file58 file57 file56 file55 file54 file53 file52 file51 file50 file49 file48 file47 file46 file45 file44 file43 file42 file41 file40 file39 file38 file37 file36 file35 file34 file33 file32 file31 file30 file29 file28 file27 file26 file25 file24 file23 file22 file21 file20 file19 file18 file17 file16 file15 file14 file13 file12 file11 file10 file9 file8 file7 file6 file5 file4 file3 file2 file1'
# Testing $dbh->func().
ok 208
ok 209
ok 210 - ping should return false after disconnect
ok
t/zvxgp_11fetch.t ..........
1..24
# fetchall_hashref(C1)
ok 1
ok 2
ok 3
ok 4
# fetchall_hashref(C2)
ok 5
ok 6
ok 7
ok 8
# fetchall_hashref([C2])
ok 9
ok 10
ok 11
ok 12
# fetchall_hashref([C1 C2])
ok 13
ok 14
ok 15
ok 16
ok 17
ok 18
ok 19
ok 20
ok 21
ok 22
ok 23
ok 24
ok
t/zvxgp_12quote.t ..........
1..10
ok 1 - ... quoting strings with embedded single quotes
ok 2 - ... quoting number as SQL_VARCHAR
ok 3 - ... quoting number as SQL_INTEGER
ok 4 - ... quoting undef as NULL
ok 5 - ... properly quotes foo as "foo"
ok 6 - ... properly quotes f"o as "f""o"
ok 7 - ... properly quotes foo, bar as "foo"."bar"
ok 8 - ... properly quotes undef, undef, bar as "bar"
ok 9 - ... properly quotes foo, undef, bar as "foo"."bar"
ok 10 # skip Can't test alternate quote_identifier logic with DBI_AUTOPROXY
ok
t/zvxgp_13taint.t .......... skipped: Taint attributes not supported with DBI::PurePerl
t/zvxgp_14utf8.t ...........
1..16
ok 1
ok 2
ok 3
ok 4
ok 5
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15
ok 16
ok
t/zvxgp_15array.t ..........
1..55
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - The object isa DBI::st
ok 4 - ... we should have 0 rows
ok 5 - ... execute_array should return false
ok 6 - execute_array failure with RaiseError should have died
ok 7
ok 8 - ... we should have 2 rows
ok 9 - ... we should have 3 tuple_status
ok 10 - ... our rows are as expected
ok 11 - ... our tuple_status is as expected
ok 12 - ... bind_param_array should return true
ok 13 - ... execute_array should return true
ok 14 - ... we should have 3 rows
ok 15 - ... we should have 3 tuple_status
ok 16 - ... our rows are as expected
ok 17 - ... our tuple_status is as expected
ok 18 - ... execute_array should return true
ok 19 - ... we should have executed 3 rows
ok 20 - ... we should have affected 3 rows
ok 21 - ... execute_array should return true
ok 22 - ... execute_array should return 0 (but true)
ok 23 - ... we should have 0 rows
ok 24 - ... we should have 0 tuple_status
ok 25 - ... execute_array should return 1
ok 26 - ... we should have 1 rows
ok 27 - ... our rows are as expected
ok 28 - ... we should have 1 tuple_status
ok 29 - ... our tuple_status is as expected
ok 30 - ... execute_array should return 0
ok 31 - ... we should have 0 rows
ok 32 - ... we should have 0 tuple_status
ok 33 - The object isa DBI::st
ok 34 - ... execute_array should return true
ok 35 - ... execute_array should return 0 (but true)
ok 36 - ... we should have 0 rows
ok 37 - ... execute_array should return true
ok 38 - ... we should have 2 rows
ok 39 - ... we should have 2 tuple_status
ok 40 - ... rows should match
ok 41 - ... tuple_status should match
ok 42 - The object isa DBI::st
ok 43 - ... execute_array should return true
ok 44 - ... we should have 3 rows
ok 45 - ... we should have 3 tuple_status
ok 46 - ... rows should match
ok 47 - ... tuple status should match
ok 48 - ... execute_array should return undef
ok 49 - ... errstr is as expected
ok 50 - ... execute_array should return undef
ok 51 - ... errstr is as expected
ok 52 - ... execute_array should return undef
ok 53 - ... errstr is as expected
ok 54 - ... bind_param_array should return undef
ok 55 - ... errstr is as expected
ok
t/zvxgp_16destroy.t ........
1..20
ok 1 - use DBI;
ok 2 - ... check DBD::Test::dr::imp_data_size to avoid typo
ok 3 - ... check DBD::Test::db::imp_data_size to avoid typo
ok 4 - Install test driver
ok 5 - Connect to test driver
ok 6 - Should start active
ok 7 - Should be active in DESTROY
ok 8 - Create with ActiveDestroy
ok 9 - InactiveDestroy should be set
ok 10 - Should start active
ok 11 - Should not be active in DESTROY
ok 12 - Create with AutoInactiveDestroy
ok 13 - InactiveDestroy should be set
ok 14 - Should start active
ok 15 - Should be active in DESTROY
ok 16 - Create with AutoInactiveDestroy again
ok 17 - InactiveDestroy should be set
ok 18 - Should start active
ok 19 - Child should be inactive on DESTROY
ok 20 - Should be active in DESTROY
ok
t/zvxgp_19fhtrace.t ........
1..27
ok 1 - use DBI;
ok 2 - The object isa DBI::db
ok 3 - ... checking TraceLevel attribute
ok 4 - ... regular fh: trace file successfully created
ok 5 - ... regular fh: filehandle successfully set
ok 6 - ... regular fh: trace_msg
ok 7 - ... regular fh: file successfully changed
Next logline
ok 8 - ... regular fh: trace_msg after changing trace output
ok 9 - Tracefile removed
ok 10 - Tracefile FOO opened
ok 11 - Tracefile created
ok 12 - Regression test
ok 13 - Traced message
ok 14 - Regression test
ok 15 - ... layered fh: file is layered: *** Test our layer
#
#
ok 16 - ... layered fh: filehandle successfully set
ok 17 - ... layered fh: trace_msg: Layered logline
#
#
DBI::db=HASH(0x3ae52f0) trace level set to 1 in DBI 1.615 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 18 - ... layered fh: close doesn't close: Layered logline
#
#
Next logline
ok 19 - ... layered fh: trace_msg after change trace output: Layered logline
#
#
ok 20 - ... scalar trace: file is layered: *** Test our layer
#
#
ok 21 - ... scalar trace: filehandle successfully set
ok 22 - ... scalar trace: *** Test our layer
# DBI::db=HASH(0x3ae52f0) trace level set to 1 in DBI 1.615 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
DBI::db=HASH(0x3ae52f0) trace level set to 1 in DBI 1.615 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 23 - ... scalar trace: close doesn't close: *** Test our layer
# DBI::db=HASH(0x3ae52f0) trace level set to 1 in DBI 1.615 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
Next logline
ok 24 - ... scalar trace: after change trace output: *** Test our layer
# DBI::db=HASH(0x3ae52f0) trace level set to 1 in DBI 1.615 (PurePerl)
# Full trace not available because DBI_TRACE is not in environment
# Layered logline
#
#
-----> execute_request
-> DBI->connect(dbi:ExampleP:dummy, , ****, HASH(0x2e86128))
<- connect= DBI::db=HASH(0x3af4198)
_std_response_attribute_names for ExampleP dbh: ChopBlanks LongReadLen LongTruncOk ReadOnly Name example_driver_path
<----- execute_request
gofer receive_response
ok 25 - ... logger: trace_msg
#
DBI::db=HASH(0x3ae52f0) trace level set to 1 in DBI 1.615 (PurePerl)
Full trace not available because DBI_TRACE is not in environment
ok 26 - ... logger: close doesn't close
#
Next logline
ok 27 - ... logger: trace_msg after change trace output
#
ok
t/zvxgp_20meta.t ...........
1..8
ok 1 - use DBI;
ok 2 - use DBI::DBD::Metadata;
ok 3 - The object isa DBI::db
ok 4
ok 5
ok 6
ok 7
ok 8
ok
t/zvxgp_30subclass.t .......
1..36
ok 1 - use DBI;
ok 2 - The object isa MyDBI::db
ok 3
ok 4 - The object isa MyDBI::db
ok 5
ok 6
ok 7 - The object isa MyDBI::st
ok 8
ok 9
ok 10
ok 11
ok 12
ok 13
ok 14
ok 15 - The reference isa ARRAY
ok 16
ok 17
ok 18
ok 19
ok 20 - Clone A isa MyDBI::db
ok 21
ok 22
ok 23 - Clone B isa MyDBI::db
ok 24
ok 25
ok 26 - The object isa MyDBI::db
ok 27
ok 28 - installed method isa ARRAY
ok 29
ok 30
ok 31
ok 32
ok 33 - Failed connect \#1
ok 34
ok 35 - Failed connect \#2
ok 36
fetch 4 prepare 1
ok
t/zvxgp_35thrclone.t .......
1..20
ok 1 - use DBI;
ok 2 - ... assignment of neat_maxlen was successful
ok 3 - The object isa DBI::db
ok 4 - ... DBI::neat_maxlen still holding its value
ok 5 - The object isa DBI::db
ok 6 - ... new $dbh is not the same instance as $dbh_parent
ok 7
ok 8 - ... DBI::neat_maxlen still holding its value
ok 9 - The object isa DBI::db
ok 10 - ... new $dbh is not the same instance as $dbh_parent
ok 11
ok 12 - ... DBI::neat_maxlen still holding its value
ok 13 - The object isa DBI::db
ok 14 - ... new $dbh is not the same instance as $dbh_parent
ok 15
ok 16 - ... DBI::neat_maxlen still holding its value
ok 17 - The object isa DBI::db
ok 18 - ... new $dbh is not the same instance as $dbh_parent
ok 19
ok 20 - ... all tests have passed
ok
t/zvxgp_40profile.t ........ skipped: profiling not supported for DBI::PurePerl
t/zvxgp_41prof_dump.t ...... skipped: profiling not supported for DBI::PurePerl
t/zvxgp_42prof_data.t ...... skipped: profiling not supported for DBI::PurePerl
t/zvxgp_43prof_env.t ....... skipped: profiling not supported for DBI::PurePerl
t/zvxgp_49dbd_file.t .......
ok 1 - use DBI;
ok 2 - use DBD::File;
ok 3 - Connect clean
ok 4 - Can connect to DBD::File driver
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 5 - f_versions
ok 6 - Connect with DBI attributes
ok 7 - Connect with driver attributes in DSN
ok 8 - Connect with driver attributes in hash
ok 9 - Prepare select from non-existing file
ok 10 - Cannot open non-existing file
# C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4600\t_sbdgf_53442gz.txt
ok 11 - drop manually created table db_4600_2 (first file)
ok 12 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4600\db_4600_2.txt removed
ok 13 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4600\db_4600_2 exists
ok 14 - drop manually created table db_4600_2 (second file)
ok 15 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4600\db_4600_2 removed
ok 16 - Create table db_4600_
ok 17 - Test table exists
ok 18 - get single table meta data
ok 19 - get multiple meta data
ok 20 - encoding shows in layer
ok 21 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 22 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 23 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 24 # skip modifying meta data doesn't work with Gofer-AutoProxy
ok 25 - Prepare select * from db_4600_
ok 26 # skip method intrusion didn't work with proxying
ok 27 - Prepare select * from DB_4600_
ok 28 # skip method intrusion didn't work with proxying
ok 29 - table drop
ok 30 - Test table removed
1..30
ok
t/zvxgp_50dbm_simple.t .....
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable FreezeThaw YAML JSON
--- Using SDBM_File () ---
# DBD::DBM 0.06 using SDBM_File (1.06)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 1 - dbm_versions
ok 2 - The object isa DBI::db
ok 3 # skip Can't set attributes after connect using DBD::Gofer
ok 4 # skip Can't set attributes after connect using DBD::Gofer
ok 5
ok 6 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 7 - execute
ok 8 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 9 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 10 - execute
ok 11 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 12 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 13 - execute
ok 14 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 15 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 16 - execute
ok 17 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 18 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 19 - execute
ok 20 - INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 21 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 22 - execute
ok 23 - INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 24 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 25 - execute
ok 26 - INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 27 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 28 - execute
ok 29 - INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 30 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 31 - execute
ok 32 - INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 33 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 34 - execute
ok 35 - DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
not ok 36 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 37 - prepare UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 38 - execute
ok 39 - UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
not ok 40 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 41 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 42 - execute
ok 43 - DELETE FROM SDBM_File_fruit WHERE dKey=7
not ok 44 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 45 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 46 - execute
ok 47 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 48 - SELECT results
ok 49 - prepare DELETE FROM SDBM_File_fruit
ok 50 - execute
ok 51 - DELETE FROM SDBM_File_fruit
not ok 52 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 53 - prepare DROP TABLE SDBM_File_fruit
ok 54 - execute
ok 55 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Data::Dumper
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 56 - dbm_versions
ok 57 - The object isa DBI::db
ok 58 # skip Can't set attributes after connect using DBD::Gofer
ok 59 # skip Can't set attributes after connect using DBD::Gofer
ok 60
ok 61 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 62 - execute
ok 63 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 64 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 65 - execute
ok 66 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 67 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 68 - execute
ok 69 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 70 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 71 - execute
ok 72 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 73 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 74 - execute
ok 75 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 76 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 77 - execute
ok 78 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 79 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 80 - execute
ok 81 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 82 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 83 - execute
ok 84 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 85 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 86 - execute
ok 87 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 88 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 89 - execute
ok 90 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 91 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 92 - execute
ok 93 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 94 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 95 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 96 - execute
ok 97 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 98 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 99 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 100 - execute
ok 101 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 102 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 103 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 104 - execute
ok 105 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 106 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 107 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 108 - execute
ok 109 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 110 - SELECT results
ok 111 - prepare DELETE FROM SDBM_File_fruit
ok 112 - execute
ok 113 - DELETE FROM SDBM_File_fruit
not ok 114 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 115 - prepare DROP TABLE SDBM_File_fruit
ok 116 - execute
ok 117 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Storable
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 118 - dbm_versions
ok 119 - The object isa DBI::db
ok 120 # skip Can't set attributes after connect using DBD::Gofer
ok 121 # skip Can't set attributes after connect using DBD::Gofer
ok 122
ok 123 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 124 - execute
ok 125 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 126 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 127 - execute
ok 128 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 129 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 130 - execute
ok 131 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 132 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 133 - execute
ok 134 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 135 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 136 - execute
ok 137 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 138 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 139 - execute
ok 140 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 141 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 142 - execute
ok 143 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 144 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 145 - execute
ok 146 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 147 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 148 - execute
ok 149 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 150 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 151 - execute
ok 152 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 153 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 154 - execute
ok 155 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 156 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 157 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 158 - execute
ok 159 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 160 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 161 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 162 - execute
ok 163 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 164 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 165 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 166 - execute
ok 167 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 168 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 169 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 170 - execute
ok 171 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 172 - SELECT results
ok 173 - prepare DELETE FROM SDBM_File_fruit
ok 174 - execute
ok 175 - DELETE FROM SDBM_File_fruit
not ok 176 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 177 - prepare DROP TABLE SDBM_File_fruit
ok 178 - execute
ok 179 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (FreezeThaw) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::FreezeThaw
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 180 - dbm_versions
ok 181 - The object isa DBI::db
ok 182 # skip Can't set attributes after connect using DBD::Gofer
ok 183 # skip Can't set attributes after connect using DBD::Gofer
ok 184
ok 185 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 186 - execute
ok 187 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 188 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 189 - execute
ok 190 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 191 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 192 - execute
ok 193 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 194 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 195 - execute
ok 196 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 197 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 198 - execute
ok 199 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 200 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 201 - execute
ok 202 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 203 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 204 - execute
ok 205 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 206 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 207 - execute
ok 208 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 209 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 210 - execute
ok 211 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 212 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 213 - execute
ok 214 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 215 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 216 - execute
ok 217 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 218 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 219 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 220 - execute
ok 221 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 222 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 223 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 224 - execute
ok 225 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 226 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 227 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 228 - execute
ok 229 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 230 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 231 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 232 - execute
ok 233 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 234 - SELECT results
ok 235 - prepare DELETE FROM SDBM_File_fruit
ok 236 - execute
ok 237 - DELETE FROM SDBM_File_fruit
not ok 238 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 239 - prepare DROP TABLE SDBM_File_fruit
ok 240 - execute
ok 241 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (YAML) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::YAML (0.10)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 242 - dbm_versions
ok 243 - The object isa DBI::db
ok 244 # skip Can't set attributes after connect using DBD::Gofer
ok 245 # skip Can't set attributes after connect using DBD::Gofer
ok 246
ok 247 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 248 - execute
ok 249 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 250 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 251 - execute
ok 252 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 253 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 254 - execute
ok 255 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 256 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 257 - execute
ok 258 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 259 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 260 - execute
ok 261 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 262 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 263 - execute
ok 264 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 265 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 266 - execute
ok 267 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 268 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 269 - execute
ok 270 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 271 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 272 - execute
ok 273 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 274 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 275 - execute
ok 276 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 277 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 278 - execute
ok 279 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 280 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 281 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 282 - execute
ok 283 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 284 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 285 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 286 - execute
ok 287 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 288 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 289 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 290 - execute
ok 291 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 292 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 293 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 294 - execute
ok 295 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 296 - SELECT results
ok 297 - prepare DELETE FROM SDBM_File_fruit
ok 298 - execute
ok 299 - DELETE FROM SDBM_File_fruit
not ok 300 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 301 - prepare DROP TABLE SDBM_File_fruit
ok 302 - execute
ok 303 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (JSON) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::JSON (0.001)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 304 - dbm_versions
ok 305 - The object isa DBI::db
ok 306 # skip Can't set attributes after connect using DBD::Gofer
ok 307 # skip Can't set attributes after connect using DBD::Gofer
ok 308
ok 309 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 310 - execute
ok 311 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 312 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 313 - execute
ok 314 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 315 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 316 - execute
ok 317 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 318 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 319 - execute
ok 320 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 321 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 322 - execute
ok 323 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 324 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 325 - execute
ok 326 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 327 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 328 - execute
ok 329 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 330 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 331 - execute
ok 332 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 333 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 334 - execute
ok 335 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 336 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 337 - execute
ok 338 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 339 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 340 - execute
ok 341 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
not ok 342 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: '-1'
ok 343 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 344 - execute
ok 345 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
not ok 346 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '2'
# expected: undef
ok 347 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 348 - execute
ok 349 - DELETE FROM SDBM_File_fruit WHERE qux=17
not ok 350 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 351 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 352 - execute
ok 353 - DELETE FROM SDBM_File_fruit WHERE dKey=8
not ok 354 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '1'
# expected: undef
ok 355 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 356 - execute
ok 357 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 358 - SELECT results
ok 359 - prepare DELETE FROM SDBM_File_fruit
ok 360 - execute
ok 361 - DELETE FROM SDBM_File_fruit
not ok 362 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows # TODO AUTOPROXY drivers might throw away sth->rows()
# Failed (TODO) test '$sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows'
# at ./t/50dbm_simple.t line 252.
# got: '4'
# expected: undef
ok 363 - prepare DROP TABLE SDBM_File_fruit
ok 364 - execute
ok 365 - DROP TABLE SDBM_File_fruit
1..365
ok
t/zvxgp_51dbm_file.t .......
ok 1 - drop table
ok 2 - FRED.dir exists
ok 3 - fred.dir exists
ok 4 - insert into mixed case table
ok 5 - insert into uppercase table
ok 6 - rows found via mixed case table
ok 7 # skip quoted identifiers aren't supported by DBI::SQL::Nano
ok 8 - drop table
1..8
ok
t/zvxgp_52dbm_complex.t .... skipped: Not running with SQL::Statement
t/zvxgp_60preparse.t ....... skipped: preparse not supported for DBI::PurePerl
t/zvxgp_65transact.t ....... skipped: Transactions not supported by DBD::Gofer
t/zvxgp_70callbacks.t ...... skipped: $h->{Callbacks} attribute not supported for DBI::PurePerl
t/zvxgp_72childhandles.t ...
1..16
ok 1
ok 2
ok 3
ok 4
ok 5 - All handles should be undef now
ok 6 - ChildHandles should be an array-ref if wekref is available
ok 7
drh DBI::dr=HASH(0x3775038)
dbh DBI::db=HASH(0x3b44dd0)
sth DBI::st=HASH(0x37bc918)
sth DBI::st=HASH(0x37be740)
sth DBI::st=HASH(0x37c03c8)
ok 8
ok 9
ok 10
ok 11
ok 12 - handles should be gone now
ok 13
ok 14
ok 15 # skip slow tests avoided when using DBD::Gofer
ok 16 # skip slow tests avoided when using DBD::Gofer
ok
t/zvxgp_80proxy.t .......... skipped: modules required for proxy are probably not installed (e.g., RPC/PlClient.pm)
t/zvxgp_85gofer.t ..........
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5336;dbm_type=SDBM_File;f_lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5336;dbm_type=SDBM_File;f_lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x4503a58)
ok 20 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 21 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 22 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5336;dbm_type=SDBM_File;f_lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5336;dbm_type=SDBM_File;f_lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x4519b58)
ok 46 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 47 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 48 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5336;dbm_type=SDBM_File;f_lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_5336;dbm_type=SDBM_File;f_lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x451b180)
ok 72 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 73 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 74 # skip skip_default_methods checking doesn't work with Gofer over Gofer
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
1..78
ok
t/zvxgp_86gofer_fail.t ..... skipped: requires Callbacks which are not supported with PurePerl
t/zvxgp_87gofer_cache.t .... skipped: Gofer DBI_AUTOPROXY
t/zvxgp_90sql_type_cast.t ..
1..24
ok 1 - result, undef
ok 2 # skip DiscardString not supported in PurePerl
ok 3 - result, invalid sql type
ok 4 - json invalid sql type
ok 5 - result, non numeric cast to int
ok 6 - json non numeric cast to int
ok 7 - result, non numeric cast to int (strict)
ok 8 - json non numeric cast to int (strict)
ok 9 - result, small int cast to int
ok 10 - json small int cast to int
ok 11 - result, 2 byte max signed int cast to int
ok 12 - json 2 byte max signed int cast to int
ok 13 - result, 2 byte max unsigned int cast to int
ok 14 - json 2 byte max unsigned int cast to int
ok 15 - result, 4 byte max signed int cast to int
ok 16 - json 4 byte max signed int cast to int
ok 17 - result, 4 byte max unsigned int cast to int
ok 18 - json 4 byte max unsigned int cast to int
ok 19 - result, small int cast to int (discard)
ok 20 # skip DiscardString not supported in PurePerl
ok 21 - result, non numeric cast to numeric
ok 22 - json non numeric cast to numeric
ok 23 - result, non numeric cast to numeric (strict)
ok 24 - json non numeric cast to numeric (strict)
ok
t/zvxnp_49dbd_file.t .......
ok 1 - use DBI;
ok 2 - use DBD::File;
ok 3 - Connect clean
ok 4 - Can connect to DBD::File driver
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 5 - f_versions
ok 6 - Connect with DBI attributes
ok 7 - Connect with driver attributes in DSN
ok 8 - Connect with driver attributes in hash
ok 9 - Prepare select from non-existing file
ok 10 - Cannot open non-existing file
# C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4924\t_sbdgf_53442gz.txt
ok 11 - drop manually created table db_4924_2 (first file)
ok 12 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4924\db_4924_2.txt removed
ok 13 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4924\db_4924_2 exists
ok 14 - drop manually created table db_4924_2 (second file)
ok 15 - C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_4924\db_4924_2 removed
ok 16 - Create table db_4924_
ok 17 - Test table exists
ok 18 - get single table meta data
ok 19 - get multiple meta data
ok 20 - encoding shows in layer
ok 21 - set single meta datum
ok 22 - verify set single meta datum
ok 23 - set multiple meta data
ok 24 - verify set multiple meta attributes
ok 25 - Prepare select * from db_4924_
ok 26 - execute on db_4924_
ok 27 - Prepare select * from DB_4924_
ok 28 - execute on DB_4924_
ok 29 - table drop
ok 30 - Test table removed
1..30
ok
t/zvxnp_50dbm_simple.t .....
Using DBM modules: SDBM_File
Using MLDBM serializers: Data::Dumper Storable FreezeThaw YAML JSON
--- Using SDBM_File () ---
# DBD::DBM 0.06 using SDBM_File (1.06)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 1 - dbm_versions
ok 2 - The object isa DBI::db
ok 3
ok 4
ok 5
ok 6 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 7 - execute
ok 8 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 9 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 10 - execute
ok 11 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10))
ok 12 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 13 - execute
ok 14 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' )
ok 15 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 16 - execute
ok 17 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change' )
ok 18 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 19 - execute
ok 20 - INSERT INTO SDBM_File_fruit VALUES (3, NULL )
ok 21 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 22 - execute
ok 23 - INSERT INTO SDBM_File_fruit VALUES (4,'to delete' )
ok 24 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 25 - execute
ok 26 - INSERT INTO SDBM_File_fruit VALUES (?,?)
ok 27 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 28 - execute
ok 29 - INSERT INTO SDBM_File_fruit VALUES (6,'to delete' )
ok 30 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 31 - execute
ok 32 - INSERT INTO SDBM_File_fruit VALUES (7,'to_delete' )
ok 33 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 34 - execute
ok 35 - DELETE FROM SDBM_File_fruit WHERE dVal='to delete'
ok 36 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to delete') == $sth->rows
ok 37 - prepare UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 38 - execute
ok 39 - UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2
ok 40 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples' WHERE dKey=2) == $sth->rows
ok 41 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 42 - execute
ok 43 - DELETE FROM SDBM_File_fruit WHERE dKey=7
ok 44 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=7) == $sth->rows
ok 45 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 46 - execute
ok 47 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 48 - SELECT results
ok 49 - prepare DELETE FROM SDBM_File_fruit
ok 50 - execute
ok 51 - DELETE FROM SDBM_File_fruit
ok 52 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 53 - prepare DROP TABLE SDBM_File_fruit
ok 54 - execute
ok 55 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Data::Dumper) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Data::Dumper
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 56 - dbm_versions
ok 57 - The object isa DBI::db
ok 58
ok 59
ok 60
ok 61 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 62 - execute
ok 63 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 64 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 65 - execute
ok 66 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 67 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 68 - execute
ok 69 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 70 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 71 - execute
ok 72 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 73 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 74 - execute
ok 75 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 76 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 77 - execute
ok 78 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 79 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 80 - execute
ok 81 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 82 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 83 - execute
ok 84 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 85 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 86 - execute
ok 87 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 88 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 89 - execute
ok 90 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 91 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 92 - execute
ok 93 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 94 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 95 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 96 - execute
ok 97 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 98 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 99 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 100 - execute
ok 101 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 102 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 103 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 104 - execute
ok 105 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 106 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 107 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 108 - execute
ok 109 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 110 - SELECT results
ok 111 - prepare DELETE FROM SDBM_File_fruit
ok 112 - execute
ok 113 - DELETE FROM SDBM_File_fruit
ok 114 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 115 - prepare DROP TABLE SDBM_File_fruit
ok 116 - execute
ok 117 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (Storable) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::Storable
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 118 - dbm_versions
ok 119 - The object isa DBI::db
ok 120
ok 121
ok 122
ok 123 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 124 - execute
ok 125 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 126 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 127 - execute
ok 128 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 129 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 130 - execute
ok 131 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 132 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 133 - execute
ok 134 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 135 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 136 - execute
ok 137 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 138 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 139 - execute
ok 140 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 141 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 142 - execute
ok 143 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 144 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 145 - execute
ok 146 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 147 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 148 - execute
ok 149 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 150 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 151 - execute
ok 152 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 153 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 154 - execute
ok 155 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 156 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 157 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 158 - execute
ok 159 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 160 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 161 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 162 - execute
ok 163 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 164 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 165 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 166 - execute
ok 167 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 168 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 169 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 170 - execute
ok 171 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 172 - SELECT results
ok 173 - prepare DELETE FROM SDBM_File_fruit
ok 174 - execute
ok 175 - DELETE FROM SDBM_File_fruit
ok 176 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 177 - prepare DROP TABLE SDBM_File_fruit
ok 178 - execute
ok 179 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (FreezeThaw) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::FreezeThaw
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 180 - dbm_versions
ok 181 - The object isa DBI::db
ok 182
ok 183
ok 184
ok 185 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 186 - execute
ok 187 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 188 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 189 - execute
ok 190 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 191 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 192 - execute
ok 193 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 194 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 195 - execute
ok 196 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 197 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 198 - execute
ok 199 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 200 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 201 - execute
ok 202 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 203 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 204 - execute
ok 205 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 206 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 207 - execute
ok 208 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 209 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 210 - execute
ok 211 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 212 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 213 - execute
ok 214 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 215 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 216 - execute
ok 217 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 218 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 219 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 220 - execute
ok 221 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 222 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 223 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 224 - execute
ok 225 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 226 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 227 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 228 - execute
ok 229 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 230 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 231 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 232 - execute
ok 233 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 234 - SELECT results
ok 235 - prepare DELETE FROM SDBM_File_fruit
ok 236 - execute
ok 237 - DELETE FROM SDBM_File_fruit
ok 238 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 239 - prepare DROP TABLE SDBM_File_fruit
ok 240 - execute
ok 241 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (YAML) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::YAML (0.10)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 242 - dbm_versions
ok 243 - The object isa DBI::db
ok 244
ok 245
ok 246
ok 247 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 248 - execute
ok 249 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 250 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 251 - execute
ok 252 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 253 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 254 - execute
ok 255 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 256 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 257 - execute
ok 258 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 259 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 260 - execute
ok 261 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 262 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 263 - execute
ok 264 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 265 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 266 - execute
ok 267 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 268 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 269 - execute
ok 270 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 271 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 272 - execute
ok 273 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 274 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 275 - execute
ok 276 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 277 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 278 - execute
ok 279 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 280 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 281 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 282 - execute
ok 283 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 284 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 285 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 286 - execute
ok 287 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 288 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 289 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 290 - execute
ok 291 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 292 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 293 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 294 - execute
ok 295 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 296 - SELECT results
ok 297 - prepare DELETE FROM SDBM_File_fruit
ok 298 - execute
ok 299 - DELETE FROM SDBM_File_fruit
ok 300 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 301 - prepare DROP TABLE SDBM_File_fruit
ok 302 - execute
ok 303 - DROP TABLE SDBM_File_fruit
--- Using SDBM_File (JSON) ---
# DBD::DBM 0.06 using SDBM_File (1.06) + MLDBM (2.04) + MLDBM::Serializer::JSON (0.001)
# DBD::File 0.40 using IO::File (1.14)
# DBI::DBD::SqlEngine 0.02 using DBI::SQL::Nano 1.014371
# DBI 1.615
# DBI::PurePerl 2.014285
# OS MSWin32 (5.2)
# Perl 5.010000 (MSWin32-x64-multi-thread)
ok 304 - dbm_versions
ok 305 - The object isa DBI::db
ok 306
ok 307
ok 308
ok 309 - prepare DROP TABLE IF EXISTS SDBM_File_fruit
ok 310 - execute
ok 311 - DROP TABLE IF EXISTS SDBM_File_fruit
ok 312 - prepare CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 313 - execute
ok 314 - CREATE TABLE SDBM_File_fruit (dKey INT, dVal VARCHAR(10), qux INT)
ok 315 - prepare INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 316 - execute
ok 317 - INSERT INTO SDBM_File_fruit VALUES (1,'oranges' , 11 )
ok 318 - prepare INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 319 - execute
ok 320 - INSERT INTO SDBM_File_fruit VALUES (2,'to_change', 0 )
ok 321 - prepare INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 322 - execute
ok 323 - INSERT INTO SDBM_File_fruit VALUES (3, NULL , 13 )
ok 324 - prepare INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 325 - execute
ok 326 - INSERT INTO SDBM_File_fruit VALUES (4,'to_delete', 14 )
ok 327 - prepare INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 328 - execute
ok 329 - INSERT INTO SDBM_File_fruit VALUES (?,?,?)
ok 330 - prepare INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 331 - execute
ok 332 - INSERT INTO SDBM_File_fruit VALUES (6,'to_delete', 16 )
ok 333 - prepare INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 334 - execute
ok 335 - INSERT INTO SDBM_File_fruit VALUES (7,'to delete', 17 )
ok 336 - prepare INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 337 - execute
ok 338 - INSERT INTO SDBM_File_fruit VALUES (8,'to remove', 18 )
ok 339 - prepare UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 340 - execute
ok 341 - UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2
ok 342 - $sth->execute(UPDATE SDBM_File_fruit SET dVal='apples', qux='12' WHERE dKey=2) == $sth->rows
ok 343 - prepare DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 344 - execute
ok 345 - DELETE FROM SDBM_File_fruit WHERE dVal='to_delete'
ok 346 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dVal='to_delete') == $sth->rows
ok 347 - prepare DELETE FROM SDBM_File_fruit WHERE qux=17
ok 348 - execute
ok 349 - DELETE FROM SDBM_File_fruit WHERE qux=17
ok 350 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE qux=17) == $sth->rows
ok 351 - prepare DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 352 - execute
ok 353 - DELETE FROM SDBM_File_fruit WHERE dKey=8
ok 354 - $sth->execute(DELETE FROM SDBM_File_fruit WHERE dKey=8) == $sth->rows
ok 355 - prepare SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 356 - execute
ok 357 - SELECT * FROM SDBM_File_fruit ORDER BY dKey DESC
ok 358 - SELECT results
ok 359 - prepare DELETE FROM SDBM_File_fruit
ok 360 - execute
ok 361 - DELETE FROM SDBM_File_fruit
ok 362 - $sth->execute(DELETE FROM SDBM_File_fruit) == $sth->rows
ok 363 - prepare DROP TABLE SDBM_File_fruit
ok 364 - execute
ok 365 - DROP TABLE SDBM_File_fruit
1..365
ok
t/zvxnp_51dbm_file.t .......
ok 1 - drop table
ok 2 - FRED.dir exists
ok 3 - fred.dir exists
ok 4 - insert into mixed case table
ok 5 - insert into uppercase table
ok 6 - rows found via cloned mixed case table
ok 7 - drop table
ok 8 - rows found via mixed case table
ok 9 # skip quoted identifiers aren't supported by DBI::SQL::Nano
ok 10 - drop table
1..10
ok
t/zvxnp_52dbm_complex.t .... skipped: Not running with SQL::Statement
t/zvxnp_85gofer.t ..........
# Transports: null pipeone stream stream_ssh
# Policies: pedantic classic rush
# Count: 0
# =============
# Testing null transport with pedantic policy
# dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_764;dbm_type=SDBM_File;f_lockfile=0
ok 1 - should connect to dbi:Gofer:transport=null;policy=pedantic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_764;dbm_type=SDBM_File;f_lockfile=0
ok 2
ok 3
ok 4
ok 5 - should detect prepare failure
ok 6
ok 7
ok 8
ok 9
ok 10
ok 11
ok 12 - go_response executed flag should be true
ok 13
ok 14
ok 15
ok 16
# Testing go_request_count and caching of simple values
ok 17
ok 18
ok 19
# use_remote=1 (policy=pedantic, transport=null) HASH(0x40822c8)
ok 20
ok 21
ok 22
ok 23 # skip caching of metadata methods returning sth not yet implemented
ok 24 # skip caching of metadata methods returning sth not yet implemented
ok 25
ok 26
# =============
# Testing null transport with classic policy
# dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_764;dbm_type=SDBM_File;f_lockfile=0
ok 27 - should connect to dbi:Gofer:transport=null;policy=classic;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_764;dbm_type=SDBM_File;f_lockfile=0
ok 28
ok 29
ok 30
ok 31 - The object isa DBI::st
ok 32
ok 33
ok 34
ok 35
ok 36
ok 37
ok 38 - go_response executed flag should be true
ok 39
ok 40
ok 41
ok 42
# Testing go_request_count and caching of simple values
ok 43
ok 44
ok 45
# use_remote=0 (policy=classic, transport=null) HASH(0x3f5da58)
ok 46
ok 47
ok 48
ok 49 # skip caching of metadata methods returning sth not yet implemented
ok 50 # skip caching of metadata methods returning sth not yet implemented
ok 51
ok 52
# =============
# Testing null transport with rush policy
# dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_764;dbm_type=SDBM_File;f_lockfile=0
ok 53 - should connect to dbi:Gofer:transport=null;policy=rush;dsn=DBI:DBM:f_dir=C\:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6\test_output_764;dbm_type=SDBM_File;f_lockfile=0
ok 54
ok 55
ok 56
ok 57 - The object isa DBI::st
ok 58
ok 59
ok 60
ok 61
ok 62
ok 63
ok 64 - go_response executed flag should be true
ok 65
ok 66
ok 67
ok 68
# Testing go_request_count and caching of simple values
ok 69
ok 70
ok 71
# use_remote=0 (policy=rush, transport=null) HASH(0x4081ec0)
ok 72
ok 73
ok 74
ok 75 # skip caching of metadata methods returning sth not yet implemented
ok 76 # skip caching of metadata methods returning sth not yet implemented
ok 77
ok 78
1..78
ok
All tests successful.
Files=170, Tests=9084, 46 wallclock secs ( 1.53 usr + 0.16 sys = 1.69 CPU)
Result: PASS
C:\Perl64\bin\perl.exe "-Iblib\lib" "-Iblib\arch" test.pl
test.pl
DBI test application $Revision: 12537 $
Switch: DBI 1.615 by Tim Bunce, 1.615
Available Drivers: ADO, AnyData, CSV, Chart, DBM, ExampleP, Excel, File, Gofer, LDAP, Log, MVS_FTPSQL, Mimer, Mock, Multiplex, ODBC, Ovrimos, PO, PgPP, Proxy, SQLRelay, SQLite, Sponge, Sprite, TSM, Template, TemplateSS, WMI, Wire10, XBase, iPod, mysql, mysqlPP
dbi:ExampleP:: testing 3 sets of 20 connections:
Connecting... 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
Disconnecting...
Connecting... 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
Disconnecting...
Connecting... 1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20
Disconnecting...
connect 20 and disconnect them, 3 times: 0.0000s / 60 = 0.0000s
Testing handle creation speed...
53333 NullP sth/s perl 5.010000 MSWin32-x64-multi-thread (cl 14.00.40310.41 -MD -Zi -DNDEBUG -Ox -GL -Wp64 -fp:precise) 0.000019s
test.pl done
TIMB/DBI-1.615.tar.gz
nmake test TEST_VERBOSE=1 -- OK
PPD for DBI-1.615 already made
Running make for A/AD/ADAMK/ORLite-1.46.tar.gz
Prepending C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6/blib/arch C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6/blib/lib C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/arch C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/lib to PERL5LIB for 'get'
Has already been unwrapped into directory C:\cpanfly\var\cpan\build\ORLite-1.46-EQsPhw
Prepending C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6/blib/arch C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6/blib/lib C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/arch C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/lib to PERL5LIB for 'make'
CPAN.pm: Going to build A/AD/ADAMK/ORLite-1.46.tar.gz
>>> nmake
Microsoft (R) Program Maintenance Utility Version 7.00.8882
Copyright (C) Microsoft Corp 1988-2000. All rights reserved.
cp lib/ORLite.pm blib\lib\ORLite.pm
ADAMK/ORLite-1.46.tar.gz
nmake -- OK
Prepending C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6/blib/arch C:\cpanfly\var\cpan\build\DBI-1.615-SSMmL6/blib/lib C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/arch C:\cpanfly\var\cpan\build\DBD-SQLite-1.31-xuvLEt/blib/lib to PERL5LIB for 'test'
Running make test
>>> nmake test TEST_VERBOSE=1
Microsoft (R) Program Maintenance Utility Version 7.00.8882
Copyright (C) Microsoft Corp 1988-2000. All rights reserved.
C:\Perl64\bin\perl.exe "-MExtUtils::Command::MM" "-e" "test_harness(1, 'inc', 'blib\lib', 'blib\arch')" t/*.t
t/01_compile.t .......
1..3
ok 1 - require ORLite;
ok 2 - require t::lib::Test;
ok 3 - $VERSION match
ok
t/02_basics.t ........
1..74
ok 1 - The object isa DBI::db
ok 2 - disconnect
ok 3 - The object isa DBI::db
ok 4 - ->sqlite ok
ok 5 - ->dsn ok
ok 6 - ->user_version ok
ok 7 - ->base ok
ok 8 - ->table ok
ok 9 - ->table_info ok
ok 10 - Created row 1
ok 11 - The object isa Foo::Bar::TableOne
ok 12 - The object isa Foo::Bar::TableOne
ok 13 - ->col1 ok
ok 14 - ->col2 ok
ok 15 - Created row 3
ok 16 - Found 3 rows
ok 17 - Condition count works
ok 18 - Got 3 objects
ok 19 - The object isa Foo::Bar::TableOne
ok 20 - ->col1 ok
ok 21 - ->col2 ok
ok 22 - The object isa Foo::Bar::TableOne
ok 23 - ->col1 ok
ok 24 - ->col2 ok
ok 25 - The object isa Foo::Bar::TableOne
ok 26 - ->col1 ok
ok 27 - ->col2 ok
ok 28 - Got 3 objects
ok 29 - The object isa Foo::Bar::TableOne
ok 30 - ->col1 ok
ok 31 - ->col2 ok
ok 32 - The object isa Foo::Bar::TableOne
ok 33 - ->col1 ok
ok 34 - ->col2 ok
ok 35 - The object isa Foo::Bar::TableOne
ok 36 - ->col1 ok
ok 37 - ->col2 ok
ok 38 - Got 3 objects
ok 39 - The object isa Foo::Bar::TableOne
ok 40 - ->col1 ok
ok 41 - ->col2 ok
ok 42 - The object isa Foo::Bar::TableOne
ok 43 - ->col1 ok
ok 44 - ->col2 ok
ok 45 - The object isa Foo::Bar::TableOne
ok 46 - ->col1 ok
ok 47 - ->col2 ok
ok 48 - Found only one record
ok 49 - Found the same first record
ok 50 - Found only one record
ok 51 - Found correct alternative
ok 52 - Deleted 2 rows
ok 53 - Confirm 2 rows were deleted
ok 54 - Deleted object
ok 55 - Confirm 1 row was deleted
ok 56 - ->select ok with nothing
ok 57 - ->select ok with nothing
ok 58 - ->connected is false
ok 59 - ->begin
ok 60 - ->connected is true
ok 61 - The object isa Foo::Bar::TableOne
ok 62 - One row created
ok 63 - ->rollback
ok 64 - ->connected is false
ok 65 - Commit ok
ok 66 - ->begin
ok 67 - The object isa Foo::Bar::TableOne
ok 68 - One row created
ok 69 - ->commit
ok 70 - Commit ok
ok 71 - ->truncate ok
ok 72 - Commit ok
ok 73 - Exception returns nothing
ok 74 - Foo::Bar::TableOne row does not exist
ok
t/03_fk.t ............
1..5
ok 1 - The object isa DBI::db
ok 2 - Got one table_two object
ok 3 - The object isa Foo::Bar::TableTwo
ok 4 - ->col1 ok
ok 5 - The object isa Foo::Bar::TableOne
ok
t/04_readonly.t ......
1..12
ok 1 - The object isa DBI::db
ok 2 - disconnect
ok 3 - The object isa DBI::db
ok 4 - ->orlite ok
ok 5 - ->sqlite method exists
ok 6 - ->load method exists
ok 7 - ->select method exists
ok 8 - ->user_version ok
ok 9 - Found 0 rows
ok 10 - Columns defined
ok 11 - No transaction support
ok 12 - Cant create object
ok
t/05_notables.t ......
1..5
ok 1 - The object isa DBI::db
ok 2 - disconnect
ok 3 - The object isa DBI::db
ok 4 - ->user_version ok
ok 5 - Table package was not created
ok
t/06_create.t ........
1..25
ok 1 - Created read code
ok 2 - Created write code
ok 3 - schema_version is zero
ok 4 - user_version is zero
ok 5 - Set user_version
ok 6 - Confirm user_version changed
ok 7 - Created test table
ok 8 - schema_version is zero
ok 9 - append params works as expected
ok 10 - Created read code
ok 11 - Created write code
ok 12 - schema_version is zero
ok 13 - Confirm user_version changed
ok 14 - Found 2 Foo objects
ok 15 - The object isa My::Test2::Foo
ok 16 - The object isa My::Test2::Foo
ok 17 - ->foo ok
ok 18 - ->foo ok
ok 19 - The object isa My::Test2::Foo
ok 20 - ->bar ok
ok 21 - The object isa DBI::db
ok 22 - Created read code
ok 23 - Created write code
ok 24 - Created table code
ok 25 - append params works as expected
ok
t/07_pk.t ............
1..6
ok 1 - The object isa DBI::db
ok 2 - Got 9 table_one objects
ok 3 - The object isa Foo::Bar::TableOne
ok 4 - One entry deleted
ok 5 - Got 2 table_one objects
ok 6 - Got line with col3 = b
ok
t/08_prune.t .........
1..7
ok 1 - File does not exist
ok 2 - 08_prune.pl without prune ran ok
ok 3 - 08_prune.pl without prune created the file as expected
ok 4 - Removed the test file
ok 5 - Removed test file
ok 6 - 08_prune.pl with prune ran ok
ok 7 - 08_prune.pl with prune removed the file
ok
t/09_badfile.t .......
1..2
ok 1 - File does not exist
ok 2 - Loading a bad database throws an exception
ok
t/10_cleanup.t .......
1..2
ok 1 - The object isa DBI::db
ok 2 - Created the ORLite class
ok
t/11_cleanup.t .......
1..4
ok 1 - The object isa DBI::db
ok 2 - Created the ORLite class
ok 3 - Created the transaction
ok 4 - ->{AutoCommit} is off
ok
t/12_xs.t ............ skipped: Class::XSAccessor 1.05 is not installed
t/13_array_basics.t ..
1..71
ok 1 - The object isa DBI::db
ok 2 - disconnect
ok 3 - The object isa DBI::db
ok 4 - ->sqlite ok
ok 5 - ->dsn ok
ok 6 - ->user_version ok
ok 7 - Created row 1
ok 8 - The object isa Foo::Bar::TableOne
ok 9 - The object isa Foo::Bar::TableOne
ok 10 - ->col1 ok
ok 11 - ->col2 ok
ok 12 - Created row 3
ok 13 - Found 3 rows
ok 14 - Condition count works
ok 15 - Got 3 objects
ok 16 - The object isa Foo::Bar::TableOne
ok 17 - ->col1 ok
ok 18 - ->col2 ok
ok 19 - The object isa Foo::Bar::TableOne
ok 20 - ->col1 ok
ok 21 - ->col2 ok
ok 22 - The object isa Foo::Bar::TableOne
ok 23 - ->col1 ok
ok 24 - ->col2 ok
ok 25 - Got 3 objects
ok 26 - The object isa Foo::Bar::TableOne
ok 27 - ->col1 ok
ok 28 - ->col2 ok
ok 29 - The object isa Foo::Bar::TableOne
ok 30 - ->col1 ok
ok 31 - ->col2 ok
ok 32 - The object isa Foo::Bar::TableOne
ok 33 - ->col1 ok
ok 34 - ->col2 ok
ok 35 - Got 3 objects
ok 36 - The object isa Foo::Bar::TableOne
ok 37 - ->col1 ok
ok 38 - ->col2 ok
ok 39 - The object isa Foo::Bar::TableOne
ok 40 - ->col1 ok
ok 41 - ->col2 ok
ok 42 - The object isa Foo::Bar::TableOne
ok 43 - ->col1 ok
ok 44 - ->col2 ok
ok 45 - Found only one record
ok 46 - Found the same first record
ok 47 - Found only one record
ok 48 - Found correct alternative
ok 49 - Deleted 2 rows
ok 50 - Confirm 2 rows were deleted
ok 51 - Deleted object
ok 52 - Confirm 1 row was deleted
ok 53 - ->select ok with nothing
ok 54 - ->select ok with nothing
ok 55 - ->begin
ok 56 - The object isa Foo::Bar::TableOne
ok 57 - One row created
ok 58 - ->rollback
ok 59 - Commit ok
ok 60 - ->begin
ok 61 - The object isa Foo::Bar::TableOne
ok 62 - One row created
ok 63 - ->commit
ok 64 - Commit ok
ok 65 - The object isa Foo::Bar::TableOne
ok 66 - ->set ok
ok 67 - ->set worked
ok 68 - ->truncate ok
ok 69 - Commit ok
ok 70 - Exception returns nothing
ok 71 - Foo::Bar::TableOne row does not exist
ok
t/14_array_fk.t ......
1..5
ok 1 - The object isa DBI::db
ok 2 - Got one table_two object
ok 3 - The object isa Foo::Bar::TableTwo
ok 4 - ->col1 ok
ok 5 - The object isa Foo::Bar::TableOne
ok
t/15_array_xs.t ...... skipped: Class::XSAccessor::Array 1.05 is not installed
t/16_array_create.t ..
1..25
ok 1 - Created read code
ok 2 - Created write code
ok 3 - schema_version is zero
ok 4 - user_version is zero
ok 5 - Set user_version
ok 6 - Confirm user_version changed
ok 7 - Created test table
ok 8 - schema_version is zero
ok 9 - append params works as expected
ok 10 - Created read code
ok 11 - Created write code
ok 12 - schema_version is zero
ok 13 - Confirm user_version changed
ok 14 - Found 2 Foo objects
ok 15 - The object isa My::Test2::Foo
ok 16 - The object isa My::Test2::Foo
ok 17 - ->foo ok
ok 18 - ->foo ok
ok 19 - The object isa My::Test2::Foo
ok 20 - ->bar ok
ok 21 - The object isa DBI::db
ok 22 - Created read code
ok 23 - Created write code
ok 24 - Created table code
ok 25 - append params works as expected
ok
t/17_cache.t .........
1..9
ok 1 - Cache file does not initially exist
ok 2 - The object isa DBI::db
ok 3 - ->sqlite ok
ok 4 - ->dsn ok
ok 5 - Cache file t\Foo-Bar-1-23-ORLite-1-46-user_version-2.pm created
ok 6 - Foo::Bar exists
ok 7 - ->sqlite ok
ok 8 - ->dsn ok
ok 9 - %INC is larger by one from cache
ok
t/18_update.t ........
1..18
ok 1 - The object isa DBI::db
ok 2 - The object isa Foo::Bar::TableOne
ok 3 - The object isa Foo::Bar::TableOne
ok 4 - Found 2 rows
ok 5 - Updated 2 rows
ok 6 - Updated 2 rows
ok 7 - Updated 1 rows
ok 8 - Updated 1 row
ok 9 - Updated 0 rows
ok 10 - Updated 0 rows
ok 11 - The object isa Foo::Bar::TableOne
ok 12 - ->col1 ok
ok 13 - ->col2 ok
ok 14 - ->update(accessor) ok
ok 15 - Change is applied identically to object and database forms
ok 16 - ->update(pk) ok
ok 17 - Change is applied identically to object and database forms
ok 18 - Exception thrown on null update
ok
All tests successful.
Files=18, Tests=273, 4 wallclock secs ( 0.05 usr + 0.00 sys = 0.05 CPU)
Result: PASS
ADAMK/ORLite-1.46.tar.gz
nmake test TEST_VERBOSE=1 -- OK
Adam Kennedy <adamk@cpan.org>
Extremely light weight SQLite-specific ORM
>>> (cd C:\cpanfly\var\cpan\build\ORLite-1.46-EQsPhw && tar cvf - ORLite-1.46.ppd blib) | gzip -c >C:/cpanfly/var/REPO/A/AD/ADAMK/ORLite-1.46.tar.gz
ORLite-1.46.ppd
blib/
blib/lib/
blib/lib/ORLite.pm
>>> mv C:\cpanfly\var\cpan\build\ORLite-1.46-EQsPhw/ORLite-1.46.ppd C:/cpanfly/var/REPO/A/AD/ADAMK
Megalib: Undefined subroutine &Digest::base::new called at C:\cpanfly\lib/ActivePerl/PPM/InstallArea.pm line 902.
Finished 2010-11-30T19:02:03