PATH=C:\Program Files\Microsoft Platform SDK\Bin;C:\Program Files\Microsoft Platform SDK\Bin\WinNT;C:\Program Files\Microsoft Visual Studio\VC98\Bin;C:\Program Files\Microsoft Visual Studio\Common\MSDev98\Bin;C:\Perl-5.12\site\bin;C:\Perl-5.12\bin;C:\cygwin\bin;C:\Program Files\Perforce;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WindowsPowerShell\v1.0;C:\mysql\bin Start 2011-01-19T21:19:23 ActivePerl-1200 CPAN-1.9402 LIB=C:\PROGRA~1\MICROS~3\VC98\Lib\PSDK;C:\PROGRA~1\MICROS~2\Lib;C:\PROGRA~1\MICROS~3\VC98\Lib;C:\PROGRA~1\MICROS~3\VC98\MFC\Lib INCLUDE=C:\PROGRA~1\MICROS~2\Include;C:\PROGRA~1\MICROS~3\VC98\ATL\Include;C:\PROGRA~1\MICROS~3\VC98\Include;C:\PROGRA~1\MICROS~3\VC98\MFC\Include PATH=C:/CPANFL~1.12/var/libs/bin;C:\PROGRA~1\MICROS~2\Bin;C:\PROGRA~1\MICROS~2\Bin\WinNT;C:\PROGRA~1\MICROS~3\VC98\Bin;C:\PROGRA~1\MICROS~3\Common\MSDev98\Bin;C:\Perl-5.12\site\bin;C:\Perl-5.12\bin;C:\cygwin\bin;C:\PROGRA~1\Perforce;C:\WINDOWS\system32;C:\WINDOWS;C:\WINDOWS\System32\Wbem;C:\WINDOWS\system32\WINDOW~2\v1.0;C:\mysql\bin Going to read 'C:\cpanfly-5.12\var\cpan\Metadata' Database was generated on Wed, 19 Jan 2011 22:49:13 GMT Running make for R/RE/REHSACK/SQL-Statement-1.32.tar.gz Fetching with LWP: http://cpan.nas.activestate.com/authors/id/R/RE/REHSACK/SQL-Statement-1.32.tar.gz Fetching with LWP: http://cpan.nas.activestate.com/authors/id/R/RE/REHSACK/CHECKSUMS Checksum for C:\cpanfly-5.12\var\cpan\sources\authors\id\R\RE\REHSACK\SQL-Statement-1.32.tar.gz ok SQL-Statement-1.32 SQL-Statement-1.32/t SQL-Statement-1.32/t/04idents.t SQL-Statement-1.32/t/03import.t SQL-Statement-1.32/t/SQLtest.pm SQL-Statement-1.32/t/17quoting.t SQL-Statement-1.32/t/02execute.t SQL-Statement-1.32/t/00error.t SQL-Statement-1.32/t/01prepare.t SQL-Statement-1.32/t/09ops.t SQL-Statement-1.32/t/08join.t SQL-Statement-1.32/t/TestLib.pm SQL-Statement-1.32/t/06virtual.t SQL-Statement-1.32/t/12eval.t SQL-Statement-1.32/t/23dialects.t SQL-Statement-1.32/t/10limit.t SQL-Statement-1.32/t/05simple.t SQL-Statement-1.32/lib SQL-Statement-1.32/lib/SQL SQL-Statement-1.32/lib/SQL/Dialects SQL-Statement-1.32/lib/SQL/Dialects/ANSI.pm SQL-Statement-1.32/lib/SQL/Dialects/Role.pm SQL-Statement-1.32/lib/SQL/Dialects/AnyData.pm SQL-Statement-1.32/lib/SQL/Dialects/CSV.pm SQL-Statement-1.32/lib/SQL/Statement SQL-Statement-1.32/lib/SQL/Statement/TermFactory.pm SQL-Statement-1.32/lib/SQL/Statement/Structure.pod SQL-Statement-1.32/lib/SQL/Statement/GetInfo.pm SQL-Statement-1.32/lib/SQL/Statement/Term.pm SQL-Statement-1.32/lib/SQL/Statement/Syntax.pod SQL-Statement-1.32/lib/SQL/Statement/RAM.pm SQL-Statement-1.32/lib/SQL/Statement/Placeholder.pm SQL-Statement-1.32/lib/SQL/Statement/Roadmap.pod SQL-Statement-1.32/lib/SQL/Statement/Function.pm SQL-Statement-1.32/lib/SQL/Statement/Util.pm SQL-Statement-1.32/lib/SQL/Statement/Embed.pod SQL-Statement-1.32/lib/SQL/Statement/Operation.pm SQL-Statement-1.32/lib/SQL/Statement/Functions.pm SQL-Statement-1.32/lib/SQL/Statement.pm SQL-Statement-1.32/lib/SQL/Parser.pm SQL-Statement-1.32/lib/SQL/Eval.pm SQL-Statement-1.32/Changes SQL-Statement-1.32/MANIFEST SQL-Statement-1.32/META.yml SQL-Statement-1.32/xt SQL-Statement-1.32/xt/pod_coverage.t SQL-Statement-1.32/xt/pod.t SQL-Statement-1.32/xt/pod-cm.t SQL-Statement-1.32/.aspell.local.pws SQL-Statement-1.32/MANIFEST.SKIP SQL-Statement-1.32/Makefile.PL SQL-Statement-1.32/README CPAN.pm: Going to build R/RE/REHSACK/SQL-Statement-1.32.tar.gz >>> C:\Perl-5.12\bin\perl.exe Makefile.PL Warning: prerequisite DBD::AnyData 0.110 not found. We have 0.09. Warning: prerequisite DBD::DBM 0.06 not found. We have 0.04. Warning: prerequisite DBD::File 0.40 not found. We have 0.38. Warning: prerequisite DBI::DBD::SqlEngine 0.03 not found. Checking if your kit is complete... Looks good Writing Makefile for SQL::Statement ---- Unsatisfied dependencies detected during ---- ---- REHSACK/SQL-Statement-1.32.tar.gz ---- DBD::AnyData [requires] DBI::DBD::SqlEngine [requires] DBD::DBM [requires] DBD::File [requires] Running make test Delayed until after prerequisites Running test for module 'DBD::AnyData' Running make for R/RE/REHSACK/DBD-AnyData-0.110.tar.gz Checksum for C:\cpanfly-5.12\var\cpan\sources\authors\id\R\RE\REHSACK\DBD-AnyData-0.110.tar.gz ok DBD-AnyData-0.110 DBD-AnyData-0.110/META.yml DBD-AnyData-0.110/Changes DBD-AnyData-0.110/MANIFEST DBD-AnyData-0.110/MANIFEST.SKIP DBD-AnyData-0.110/Build.PL DBD-AnyData-0.110/Makefile.PL DBD-AnyData-0.110/README DBD-AnyData-0.110/lib DBD-AnyData-0.110/lib/DBD DBD-AnyData-0.110/lib/DBD/AnyData.pm DBD-AnyData-0.110/t DBD-AnyData-0.110/t/00-load.t DBD-AnyData-0.110/t/manifest.t DBD-AnyData-0.110/t/pod.t DBD-AnyData-0.110/t/01-basic.t CPAN.pm: Going to build R/RE/REHSACK/DBD-AnyData-0.110.tar.gz >>> C:\Perl-5.12\bin\perl.exe Makefile.PL Checking if your kit is complete... Looks good Writing Makefile for DBD::AnyData ---- Unsatisfied dependencies detected during ---- ---- REHSACK/DBD-AnyData-0.110.tar.gz ---- SQL::Statement [requires] DBI [requires] Recursive dependency detected: SQL::Statement (have: 1.25; want: 1.32) => REHSACK/SQL-Statement-1.32.tar.gz => DBD::AnyData (have: N/A; requires: 0.110) => REHSACK/DBD-AnyData-0.110.tar.gz => SQL::Statement (have: 1.25; requires: 1.27_02). Cannot resolve. REHSACK/DBD-AnyData-0.110.tar.gz [depend] -- NOT OK Running make test Can't test without successful make Running test for module 'DBI::DBD::SqlEngine' Running make for T/TI/TIMB/DBI-1.616.tar.gz Checksum for C:\cpanfly-5.12\var\cpan\sources\authors\id\T\TI\TIMB\DBI-1.616.tar.gz ok DBI-1.616/ DBI-1.616/Changes DBI-1.616/dbd_xsh.h DBI-1.616/DBI.pm DBI-1.616/DBI.xs DBI-1.616/dbi_sql.h DBI-1.616/dbilogstrip.PL DBI-1.616/dbipport.h DBI-1.616/dbiprof.PL DBI-1.616/dbiproxy.PL DBI-1.616/dbivport.h DBI-1.616/DBIXS.h DBI-1.616/dbixs_rev.h DBI-1.616/dbixs_rev.pl DBI-1.616/Driver.xst DBI-1.616/Driver_xst.h DBI-1.616/ex/ DBI-1.616/lib/ DBI-1.616/Makefile.PL DBI-1.616/MANIFEST DBI-1.616/META.yml DBI-1.616/Perl.xs DBI-1.616/README DBI-1.616/t/ DBI-1.616/test.pl DBI-1.616/TODO_2005.txt DBI-1.616/TODO_gofer.txt DBI-1.616/typemap DBI-1.616/t/01basics.t DBI-1.616/t/02dbidrv.t DBI-1.616/t/03handle.t DBI-1.616/t/04mods.t DBI-1.616/t/05concathash.t DBI-1.616/t/06attrs.t DBI-1.616/t/07kids.t DBI-1.616/t/08keeperr.t DBI-1.616/t/09trace.t DBI-1.616/t/10examp.t DBI-1.616/t/11fetch.t DBI-1.616/t/12quote.t DBI-1.616/t/13taint.t DBI-1.616/t/14utf8.t DBI-1.616/t/15array.t DBI-1.616/t/16destroy.t DBI-1.616/t/19fhtrace.t DBI-1.616/t/20meta.t DBI-1.616/t/30subclass.t DBI-1.616/t/35thrclone.t DBI-1.616/t/40profile.t DBI-1.616/t/41prof_dump.t DBI-1.616/t/42prof_data.t DBI-1.616/t/43prof_env.t DBI-1.616/t/48dbi_dbd_sqlengine.t DBI-1.616/t/49dbd_file.t DBI-1.616/t/50dbm_simple.t DBI-1.616/t/51dbm_file.t DBI-1.616/t/52dbm_complex.t DBI-1.616/t/60preparse.t DBI-1.616/t/65transact.t DBI-1.616/t/70callbacks.t DBI-1.616/t/72childhandles.t DBI-1.616/t/80proxy.t DBI-1.616/t/85gofer.t DBI-1.616/t/86gofer_fail.t DBI-1.616/t/87gofer_cache.t DBI-1.616/t/90sql_type_cast.t DBI-1.616/t/lib.pl DBI-1.616/t/pod-coverage.t DBI-1.616/t/pod.t DBI-1.616/lib/Bundle/ DBI-1.616/lib/DBD/ DBI-1.616/lib/DBI/ DBI-1.616/lib/Win32/ DBI-1.616/lib/Win32/DBIODBC.pm DBI-1.616/lib/DBI/Const/ DBI-1.616/lib/DBI/DBD/ DBI-1.616/lib/DBI/DBD.pm DBI-1.616/lib/DBI/FAQ.pm DBI-1.616/lib/DBI/Gofer/ DBI-1.616/lib/DBI/Profile.pm DBI-1.616/lib/DBI/ProfileData.pm DBI-1.616/lib/DBI/ProfileDumper/ DBI-1.616/lib/DBI/ProfileDumper.pm DBI-1.616/lib/DBI/ProfileSubs.pm DBI-1.616/lib/DBI/ProxyServer.pm DBI-1.616/lib/DBI/PurePerl.pm DBI-1.616/lib/DBI/SQL/ DBI-1.616/lib/DBI/Util/ DBI-1.616/lib/DBI/W32ODBC.pm DBI-1.616/lib/DBI/Util/_accessor.pm DBI-1.616/lib/DBI/Util/CacheMemory.pm DBI-1.616/lib/DBI/SQL/Nano.pm DBI-1.616/lib/DBI/ProfileDumper/Apache.pm DBI-1.616/lib/DBI/Gofer/Execute.pm DBI-1.616/lib/DBI/Gofer/Request.pm DBI-1.616/lib/DBI/Gofer/Response.pm DBI-1.616/lib/DBI/Gofer/Serializer/ DBI-1.616/lib/DBI/Gofer/Transport/ DBI-1.616/lib/DBI/Gofer/Transport/Base.pm DBI-1.616/lib/DBI/Gofer/Transport/pipeone.pm DBI-1.616/lib/DBI/Gofer/Transport/stream.pm DBI-1.616/lib/DBI/Gofer/Serializer/Base.pm DBI-1.616/lib/DBI/Gofer/Serializer/DataDumper.pm DBI-1.616/lib/DBI/Gofer/Serializer/Storable.pm DBI-1.616/lib/DBI/DBD/Metadata.pm DBI-1.616/lib/DBI/DBD/SqlEngine/ DBI-1.616/lib/DBI/DBD/SqlEngine.pm DBI-1.616/lib/DBI/DBD/SqlEngine/Developers.pod DBI-1.616/lib/DBI/DBD/SqlEngine/HowTo.pod DBI-1.616/lib/DBI/Const/GetInfo/ DBI-1.616/lib/DBI/Const/GetInfoReturn.pm DBI-1.616/lib/DBI/Const/GetInfoType.pm DBI-1.616/lib/DBI/Const/GetInfo/ANSI.pm DBI-1.616/lib/DBI/Const/GetInfo/ODBC.pm DBI-1.616/lib/DBD/DBM.pm DBI-1.616/lib/DBD/ExampleP.pm DBI-1.616/lib/DBD/File/ DBI-1.616/lib/DBD/File.pm DBI-1.616/lib/DBD/Gofer/ DBI-1.616/lib/DBD/Gofer.pm DBI-1.616/lib/DBD/NullP.pm DBI-1.616/lib/DBD/Proxy.pm DBI-1.616/lib/DBD/Sponge.pm DBI-1.616/lib/DBD/Gofer/Policy/ DBI-1.616/lib/DBD/Gofer/Transport/ DBI-1.616/lib/DBD/Gofer/Transport/Base.pm DBI-1.616/lib/DBD/Gofer/Transport/corostream.pm DBI-1.616/lib/DBD/Gofer/Transport/null.pm DBI-1.616/lib/DBD/Gofer/Transport/pipeone.pm DBI-1.616/lib/DBD/Gofer/Transport/stream.pm DBI-1.616/lib/DBD/Gofer/Policy/Base.pm DBI-1.616/lib/DBD/Gofer/Policy/classic.pm DBI-1.616/lib/DBD/Gofer/Policy/pedantic.pm DBI-1.616/lib/DBD/Gofer/Policy/rush.pm DBI-1.616/lib/DBD/File/Developers.pod DBI-1.616/lib/DBD/File/HowTo.pod DBI-1.616/lib/DBD/File/Roadmap.pod DBI-1.616/lib/Bundle/DBI.pm DBI-1.616/ex/corogofer.pl DBI-1.616/ex/perl_dbi_nulls_test.pl DBI-1.616/ex/profile.pl CPAN.pm: Going to build T/TI/TIMB/DBI-1.616.tar.gz >>> C:\Perl-5.12\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_48dbi_dbd_sqlengine.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_48dbi_dbd_sqlengine.t 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_48dbi_dbd_sqlengine.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_48dbi_dbd_sqlengine.t 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_48dbi_dbd_sqlengine.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_48dbi_dbd_sqlengine.t 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_48dbi_dbd_sqlengine.t 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 SQL::Statement (1.27) 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:/Perl-5.12/lib/Bundle/DBD C:/Perl-5.12/lib/Bundle/DBI.pm C:/Perl-5.12/lib/DBD C:/Perl-5.12/lib/DBI C:/Perl-5.12/lib/DBI.pm C:/Perl-5.12/lib/DBI/Changes.pm C:/Perl-5.12/lib/DBI/Const C:/Perl-5.12/lib/DBI/Const/GetInfo C:/Perl-5.12/lib/DBI/Const/GetInfo/ANSI.pm C:/Perl-5.12/lib/DBI/Const/GetInfo/ODBC.pm C:/Perl-5.12/lib/DBI/Const/GetInfoReturn.pm C:/Perl-5.12/lib/DBI/Const/GetInfoType.pm C:/Perl-5.12/lib/DBI/DBD C:/Perl-5.12/lib/DBI/DBD.pm C:/Perl-5.12/lib/DBI/DBD/Metadata.pm C:/Perl-5.12/lib/DBI/FAQ.pm C:/Perl-5.12/lib/DBI/Gofer C:/Perl-5.12/lib/DBI/Gofer/Execute.pm C:/Perl-5.12/lib/DBI/Gofer/Request.pm C:/Perl-5.12/lib/DBI/Gofer/Response.pm C:/Perl-5.12/lib/DBI/Gofer/Serializer C:/Perl-5.12/lib/DBI/Gofer/Serializer/Base.pm C:/Perl-5.12/lib/DBI/Gofer/Serializer/DataDumper.pm C:/Perl-5.12/lib/DBI/Gofer/Serializer/Storable.pm C:/Perl-5.12/lib/DBI/Gofer/Transport C:/Perl-5.12/lib/DBI/Gofer/Transport/Base.pm C:/Perl-5.12/lib/DBI/Gofer/Transport/pipeone.pm C:/Perl-5.12/lib/DBI/Gofer/Transport/stream.pm C:/Perl-5.12/lib/DBI/Profile.pm C:/Perl-5.12/lib/DBI/ProfileData.pm C:/Perl-5.12/lib/DBI/ProfileDumper C:/Perl-5.12/lib/DBI/ProfileDumper.pm C:/Perl-5.12/lib/DBI/ProfileDumper/Apache.pm C:/Perl-5.12/lib/DBI/ProfileSubs.pm C:/Perl-5.12/lib/DBI/ProxyServer.pm C:/Perl-5.12/lib/DBI/PurePerl.pm C:/Perl-5.12/lib/DBI/Roadmap.pm C:/Perl-5.12/lib/DBI/SQL C:/Perl-5.12/lib/DBI/SQL/Nano.pm C:/Perl-5.12/lib/DBI/Util C:/Perl-5.12/lib/DBI/Util/CacheMemory.pm C:/Perl-5.12/lib/DBI/Util/_accessor.pm C:/Perl-5.12/lib/DBI/W32ODBC.pm C:/Perl-5.12/lib/PerlEx/DBI.pm C:/Perl-5.12/lib/Win32/DBIODBC.pm C:/Perl-5.12/lib/auto/DBD C:/Perl-5.12/lib/auto/DBI C:/Perl-5.12/lib/auto/DBI/.packlist C:/Perl-5.12/lib/auto/DBI/DBI.bs C:/Perl-5.12/lib/auto/DBI/DBI.dll C:/Perl-5.12/lib/auto/DBI/DBI.exp C:/Perl-5.12/lib/auto/DBI/DBI.lib C:/Perl-5.12/lib/auto/DBI/DBIXS.h C:/Perl-5.12/lib/auto/DBI/Driver.xst C:/Perl-5.12/lib/auto/DBI/Driver_xst.h C:/Perl-5.12/lib/auto/DBI/dbd_xsh.h C:/Perl-5.12/lib/auto/DBI/dbi_sql.h C:/Perl-5.12/lib/auto/DBI/dbipport.h C:/Perl-5.12/lib/auto/DBI/dbivport.h C:/Perl-5.12/lib/auto/DBI/dbixs_rev.h I see you're using perl 5.012000 on MSWin32-x86-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:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "mkpath" -- blib\lib\DBI C:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "rm_f" -- blib\lib\DBI\Changes.pm C:\Perl-5.12\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/corostream.pm blib\lib\DBD\Gofer\Transport\corostream.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/File/HowTo.pod blib\lib\DBD\File\HowTo.pod cp lib/DBD/Gofer/Policy/pedantic.pm blib\lib\DBD\Gofer\Policy\pedantic.pm 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/DBI/PurePerl.pm blib\lib\DBI\PurePerl.pm cp lib/DBD/ExampleP.pm blib\lib\DBD\ExampleP.pm cp lib/DBI/ProfileData.pm blib\lib\DBI\ProfileData.pm C:\Perl-5.12\bin\perl.exe -p -e "s/~DRIVER~/Perl/g" Driver.xst > Perl.xsi C:\Perl-5.12\bin\perl.exe C:\cpanfly-5.12\var\megalib\ExtUtils\xsubpp -typemap C:\Perl-5.12\lib\ExtUtils\typemap -typemap typemap Perl.xs > Perl.xsc && C:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "mv" -- Perl.xsc Perl.c cl -c -nologo -GF -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DUSE_SITECUSTOMIZE -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX -MD -Zi -DNDEBUG -O1 -DVERSION=\"1.616\" -DXS_VERSION=\"1.616\" "-IC:\Perl-5.12\lib\CORE" Perl.c Perl.c C:\Perl-5.12\bin\perl.exe C:\cpanfly-5.12\var\megalib\ExtUtils\xsubpp -typemap C:\Perl-5.12\lib\ExtUtils\typemap -typemap typemap DBI.xs > DBI.xsc && C:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "mv" -- DBI.xsc DBI.c cl -c -nologo -GF -W3 -MD -Zi -DNDEBUG -O1 -DWIN32 -D_CONSOLE -DNO_STRICT -DHAVE_DES_FCRYPT -DUSE_SITECUSTOMIZE -DPERL_IMPLICIT_CONTEXT -DPERL_IMPLICIT_SYS -DUSE_PERLIO -DPERL_MSVCRT_READFIX -MD -Zi -DNDEBUG -O1 -DVERSION=\"1.616\" -DXS_VERSION=\"1.616\" "-IC:\Perl-5.12\lib\CORE" DBI.c DBI.c DBI.xs(288) : warning C4018: '<' : signed/unsigned mismatch DBI.xs(322) : warning C4018: '<' : signed/unsigned mismatch DBI.xs(348) : warning C4018: '<' : signed/unsigned mismatch Running Mkbootstrap for DBI () C:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644 DBI.bs C:\Perl-5.12\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 -libpath:"C:\Perl-5.12\lib\CORE" -machine:x86 DBI.obj C:\Perl-5.12\lib\CORE\perl512.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 comctl32.lib msvcrt.lib -def:DBI.def Creating library blib\arch\auto\DBI\DBI.lib and object blib\arch\auto\DBI\DBI.exp 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:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "chmod" -- 755 blib\arch\auto\DBI\DBI.dll C:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "cp" -- DBI.bs blib\arch\auto\DBI\DBI.bs C:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "chmod" -- 644 blib\arch\auto\DBI\DBI.bs C:\Perl-5.12\bin\perl.exe "-Iblib\arch" "-Iblib\lib" dbiprof.PL dbiprof Extracted dbiprof from dbiprof.PL with variable substitutions. C:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "cp" -- dbiprof blib\script\dbiprof pl2bat.bat blib\script\dbiprof C:\Perl-5.12\bin\perl.exe "-Iblib\arch" "-Iblib\lib" dbiproxy.PL dbiproxy Extracted dbiproxy from dbiproxy.PL with variable substitutions. C:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "cp" -- dbiproxy blib\script\dbiproxy pl2bat.bat blib\script\dbiproxy C:\Perl-5.12\bin\perl.exe "-Iblib\arch" "-Iblib\lib" dbilogstrip.PL dbilogstrip Extracted dbilogstrip from dbilogstrip.PL with variable substitutions. C:\Perl-5.12\bin\perl.exe -MExtUtils::Command -e "cp" -- dbilogstrip blib\script\dbilogstrip pl2bat.bat blib\script\dbilogstrip TIMB/DBI-1.616.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:\Perl-5.12\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(0x1aa30c4)) 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(0x1ae8fec) 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(0x1ae8fec) 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(0x1ae8fec) 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(0x1ae8fec) 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(0x19c6a1c), 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(0x19c6a1c), 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(0x19c6a1c), 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(0x19c6a1c), 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(0x19c6a1c), 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(0x19c6a1c), 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(0x19c6a1c), 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 = 3153 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(0x1b06a1c)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at t/09trace.t line 119 ok 62 ok 63 caught warn: DBI::db=HASH(0x1b06a1c)->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(0x1b40ab4) ne DBI::db=HASH(0x1b40ab4) 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(0x1b40ab4), 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(0x1b40ab4), 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(0x1b40ab4), 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(0x1b40ab4), 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(0x2c2eed4)->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(0x2c2f014)->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 ) [1 items] 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(0x1ada4d4)~0x1ada454 0) thr#234014 <- trace= ( 2 ) [1 items] 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 ) [1 items] 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(0x1a9b6f4))= ( 1 ) [1 items] at 19fhtrace.t line 272 # Layered logline # # Next logline <- trace(1, 'STDOUT')= ( 1 ) [1 items] at 19fhtrace.t line 278 ok 23 - ... scalar trace: close doesn't close: *** Test our layer # <- trace(1, GLOB(0x1a9b6f4))= ( 1 ) [1 items] at 19fhtrace.t line 272 # Layered logline # # ok 24 - ... scalar trace: after change trace output: *** Test our layer # <- trace(1, GLOB(0x1a9b6f4))= ( 1 ) [1 items] at 19fhtrace.t line 272 # Layered logline # # ok 25 - ... logger: trace_msg # Next logline DBI::db=HASH(0x1ada454) trace level set to 0x0/1 (DBI @ 0x100/0) in DBI 1.616-ithread (pid 1244) ok 26 - ... logger: close doesn't close # ok 27 - ... logger: trace_msg after change trace output # Next logline <- disconnect= ( 1 ) [1 items] at 19fhtrace.t line 164 <- FETCH('Active')= ( '' ) [1 items] at ExampleP.pm line 260 <- DESTROY(DBI::db=HASH(0x1ada454))= ( undef ) [1 items] 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 - connect ok 2 - Profile and DBI_PROFILE not set ok 3 ok 4 ok 5 bless( { 'Path' => [ '!MethodName', '!Caller2' ], 'Data' => { 'do' => { '40profile.t line 80' => [ 1, '0', '0', '0', '0', '1295500780.72663', '1295500780.72663' ] } } }, 'DBI::Profile' ) ok 6 ok 7 ok 8 - on at connect, 1 key ok 9 - on at connect, 1 key ok 10 - STORE is ref dbi_profile bless( { 'Path' => [ '!Statement', '!MethodName' ], 'Data' => { '' => { 'connected' => [ 1, '0', '0', '0', '0', '1295500780.72663', '1295500780.72663' ], 'STORE' => [ 5, '0', '0', '0', '0', '1295500780.72663', '1295500780.72663' ] }, 'Hi mom' => { 'my_method_name' => [ 1, '1', '1', '1', '1', '1295500780.72663', '1295500780.72663' ] } } }, 'DBI::Profile' ) ok 11 - avoid rounding, 1 key ok 12 - avoid rounding, 1 dummy statement ok 13 - dummy method name is array 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 1295500780.72663 1295500780.72663 ok 17 2 3 1 1 2 1295500780.72663 1295500780.72663 ok 18 Test collected profile data bless( { 'Path' => [ '!Statement' ], 'Data' => { 'set foo=1' => [ 1, '0', '0', '0', '0', '1295500780.94538', '1295500780.94538' ], '' => [ 6, '0', '0', '0', '0', '1295500780.72663', '1295500780.72663' ], 'select mode,size,name from ?' => [ 2301, '0.1875', '0', '0', '0.015625', '1295500780.74225', '1295500780.94538' ] } }, 'DBI::Profile' ) ok 19 - profile data ok 20 - ARRAY ref ok 21 - 7 elements ok 22 - all 7 defined ok 23 - all 7 numeric ok 24 - count is 3 ok 25 - total > first ok 26 - total > longest ok 27 - longest > 0 ok 28 - longest > shortest ok 29 - time1 later than start time ok 30 - time2 later than start time ok 31 - time1 <= time2 ok 32 - next > time1 ok 33 - next > time2 ok 34 - profile Test profile format Profile Output DBI::Profile: 0.187500s 85.71% (2308 calls) 40profile.t @ 2011-01-19 21:19:40 '' => 0.000000s / 6 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s) 'select mode,size,name from ?' => 0.187500s / 2301 = 0.000081s avg (first 0.000000s, min 0.000000s, max 0.015625s) 'set foo=1' => 0.000000s ok 35 - non zero length ok 36 - DBI::Profile ok 37 - some calls ok 38 - calls >= count ok 39 - username stored ok 40 ok 41 - should have 8 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 - as_text ok 55 - as_text sortsub ok 56 - as_text general DBI::Profile: 2.000000s 200.00% (203 calls) 40profile.t @ 2011-01-19 21:19:41 '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 - merged nodes ok 58 - merged time ok 59 - merged time foo/bar ok 60 - merged nodes foo/bar time DBI::Profile: 0.000000s 0.00% (11 calls) 40profile.t @ 2011-01-19 21:19:41 'foo' => 'DESTROY' => '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 = 6 0 0 0 0 1295500781.11725 1295500781.11725 + 1 select mode,size,name from ? = 2 0 0 0 0 1295500781.11725 1295500781.11725 + 1 = 2 0 0 0 0 1295500781.11725 1295500781.11725 + 1 select mode,size,name from ? = 47 0 0 0 0 1295500781.11725 1295500781.11725 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 (23 calls) 43prof_env.t @ 2011-01-19 21:19:41 '' => 'DESTROY' => 0.000000s 'FETCH' => 0.000000s / 2 = 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/48dbi_dbd_sqlengine.t ......... ok 1 - use DBI; ok 2 - use DBI::DBD::SqlEngine; ok 3 - use DBD::File; ok 4 - prepare 'CREATE TABLE foo (id INT, foo TEXT)' ok 5 - prepare 'CREATE TABLE bar (id INT, baz TEXT)' ok 6 - prepare 'INSERT INTO foo VALUES (1, "Hello world")' ok 7 - prepare 'INSERT INTO bar VALUES (1, "Bugfixes welcome")' ok 8 - prepare 'INSERT bar VALUES (2, "Bug reports, too")' ok 9 - prepare 'SELECT foo FROM foo where ID=1' ok 10 - prepare 'UPDATE bar SET id=5 WHERE baz="Bugfixes welcome"' ok 11 - prepare 'DELETE FROM foo' ok 12 - prepare 'DELETE FROM bar WHERE baz="Bugfixes welcome"' ok 13 - Junk: prepare 'Junk' ok 14 - missing table: prepare 'CREATE foo (id INT, foo TEXT)' ok 15 - missing "VALUES": prepare 'INSERT INTO bar (1, "Bugfixes welcome")' ok 16 - missing "SET": prepare 'UPDATE bar id=5 WHERE baz="Bugfixes welcome"' ok 17 - waste between "DELETE" and "FROM": prepare 'DELETE * FROM foo' ok 18 # skip Not running with SQL::Statement ok 19 # skip Not running with SQL::Statement ok 20 # skip Not running with SQL::Statement 1..20 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5908\t_sbdgf_53442gz.txt ok 11 - drop manually created table db_5908_2 (first file) ok 12 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5908\db_5908_2.txt removed ok 13 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5908\db_5908_2 exists ok 14 - drop manually created table db_5908_2 (second file) ok 15 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5908\db_5908_2 removed ok 16 - Create table db_5908_ 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_5908_ ok 26 - execute on db_5908_ ok 27 - Prepare select * from DB_5908_ ok 28 - execute on DB_5908_ 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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 - fred.pag exists ok 5 - insert into mixed case table ok 6 - insert into uppercase table ok 7 - rows found via cloned mixed case table ok 8 - drop table ok 9 - rows found via mixed case table ok 10 # skip quoted identifiers aren't supported by DBI::SQL::Nano ok 11 - disconnect ok 12 - rows found after reconnect using "dbm_tables" ok 13 - drop table ok 14 - fred.dir removed ok 15 - fred.pag removed 1..15 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(0x1af1de4) dbh DBI::db=HASH(0x1af1fd4) sth DBI::st=HASH(0x1ac2a74) sth DBI::st=HASH(0x195bf8c) sth DBI::st=HASH(0x1ac24c4) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4188;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4188;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(0x3244044) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4188;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4188;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(0x321fc14) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4188;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4188;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(0x3253e0c) 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(0x1acedd4) 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..45 ok 1 - result, undef ok 2 - json undef ok 3 - discard works, undef ok 4 - result, invalid sql type ok 5 - json invalid sql type ok 6 - result, non numeric cast to int ok 7 - json non numeric cast to int ok 8 - result, non numeric cast to int (strict) ok 9 - json non numeric cast to int (strict) ok 10 - result, small int cast to int ok 11 - json small int cast to int ok 12 - result, 2 byte max signed int cast to int ok 13 - json 2 byte max signed int cast to int ok 14 - result, 2 byte max unsigned int cast to int ok 15 - json 2 byte max unsigned int cast to int ok 16 - result, 4 byte max signed int cast to int ok 17 - json 4 byte max signed int cast to int ok 18 - result, 4 byte max unsigned int cast to int ok 19 - json 4 byte max unsigned int cast to int ok 20 - result, small int cast to int (discard) ok 21 - json small int cast to int (discard) ok 22 - discard works, small int cast to int (discard) ok 23 - result, non numeric cast to numeric ok 24 - json non numeric cast to numeric ok 25 - result, non numeric cast to numeric (strict) ok 26 - json non numeric cast to numeric (strict) ok 27 - result, very large int cast to int ok 28 - json very large int cast to int ok 29 - result, very large int cast to int (strict) ok 30 - json very large int cast to int (strict) ok 31 - result, float cast to int ok 32 - json float cast to int ok 33 - result, float cast to int (strict) ok 34 - json float cast to int (strict) ok 35 - result, float cast to double ok 36 - json float cast to double ok 37 - nv defined float cast to double ok 38 - result, 4 byte max unsigned int cast to int (ivsize=4) ok 39 - json 4 byte max unsigned int cast to int (ivsize=4) ok 40 - result, non numeric cast to double ok 41 - json non numeric cast to double ok 42 - nv not defined non numeric cast to double ok 43 - result, non numeric cast to double (strict) ok 44 - json non numeric cast to double (strict) ok 45 - nv not defined non numeric cast to double (strict) ok t/pod-coverage.t ................ skipped: Currently a developer-only test t/pod.t ......................... 1..60 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\corostream.pm ok 48 - POD test for blib\lib\DBD\Gofer\Transport\null.pm ok 49 - POD test for blib\lib\DBD\Gofer\Transport\pipeone.pm ok 50 - POD test for blib\lib\DBD\Gofer\Transport\stream.pm ok 51 - POD test for blib\lib\DBI\Const\GetInfo\ANSI.pm ok 52 - POD test for blib\lib\DBI\Const\GetInfo\ODBC.pm ok 53 - POD test for blib\lib\DBI\DBD\SqlEngine\Developers.pod ok 54 - POD test for blib\lib\DBI\DBD\SqlEngine\HowTo.pod ok 55 - POD test for blib\lib\DBI\Gofer\Serializer\Base.pm ok 56 - POD test for blib\lib\DBI\Gofer\Serializer\DataDumper.pm ok 57 - POD test for blib\lib\DBI\Gofer\Serializer\Storable.pm ok 58 - POD test for blib\lib\DBI\Gofer\Transport\Base.pm ok 59 - POD test for blib\lib\DBI\Gofer\Transport\pipeone.pm ok 60 - 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(0x1aa2f64)) 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(0x1ca96a4), 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(0x1ca96a4), 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(0x1ca96a4), 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(0x1ca96a4), 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(0x1ca96a4), 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(0x1ca96a4), 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(0x1ca96a4), 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 = 11268 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(0x1ce46d4)->parse_trace_flags(nonesuch) ignored unknown trace flags: 'nonesuch' at C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\blib\lib/DBI/Gofer/Execute.pm line 329 ok 62 ok 63 caught warn: DBI::db=HASH(0x1cd2aa4)->parse_trace_flags(nonesuch|SQL|nonesuch2) ignored unknown trace flags: 'nonesuch' 'nonesuch2' at C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\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(0x1cf66ac) ne DBI::db=HASH(0x1cf66ac) 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(0x1cf66ac), 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(0x1cf66ac), 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(0x1cf66ac), 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(0x1cf66ac), 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 ) [1 items] 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(0x1ca9bb4)~0x1ca4914 0) thr#234014 <- trace= ( 2 ) [1 items] 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 ) [1 items] 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(0x1aa7a6c))= ( 1 ) [1 items] at 19fhtrace.t line 272 # Layered logline # # Next logline <- trace(1, 'STDOUT')= ( 1 ) [1 items] at 19fhtrace.t line 278 ok 23 - ... scalar trace: close doesn't close: *** Test our layer # <- trace(1, GLOB(0x1aa7a6c))= ( 1 ) [1 items] at 19fhtrace.t line 272 # Layered logline # # ok 24 - ... scalar trace: after change trace output: *** Test our layer # <- trace(1, GLOB(0x1aa7a6c))= ( 1 ) [1 items] at 19fhtrace.t line 272 # Layered logline # # Next logline -----> execute_request <- connect('dummy', '', ...)= ( DBI::db=HASH(0x1cf28c4) ) [1 items] at DBI.pm line 665 <- STORE('RaiseError', 1)= ( 1 ) [1 items] at DBI.pm line 717 <- STORE('PrintError', undef)= ( 1 ) [1 items] at DBI.pm line 717 <- STORE('AutoCommit', 1)= ( 1 ) [1 items] at DBI.pm line 717 <- STORE('PrintWarn', undef)= ( 1 ) [1 items] at DBI.pm line 720 <- STORE('Username', '')= ( 1 ) [1 items] at DBI.pm line 720 <- STORE('dbi_go_execute_unique', 'DBI::Gofer::Execute|5172|')= ( 1 ) [1 items] at DBI.pm line 720 <- STORE('Executed', 0)= ( 1 ) [1 items] at DBI.pm line 720 <- connected('dbi:ExampleP:dummy', undef, ...)= ( undef ) [1 items] at DBI.pm line 727 <- STORE('dbi_connect_closure', CODE(0x1cf25f4))= ( 1 ) [1 items] at DBI.pm line 736 <- FETCH('CachedKids')= ( undef ) [1 items] at Execute.pm line 221 <- $DBI::err= undef <- $DBI::errstr= undef <- $DBI::state= '' <- FETCH('Executed')= ( '' ) [1 items] at Execute.pm line 261 <- private_attribute_info= ( HASH(0x1cf2b04)1keys ) [1 items] 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\blib\lib/DBD/ExampleP.pm' ) [6 items] at Execute.pm line 372 <> FETCH('ImplementorClass')= ( 'DBD::ExampleP::db' ) [1 items] ('ImplementorClass' from cache) at Execute.pm line 561 <- set_err(undef, undef)= ( undef ) [1 items] at Execute.pm line 234 <- FETCH('Active')= ( 1 ) [1 items] at ExampleP.pm line 260 <- disconnect= ( 1 ) [1 items] at ExampleP.pm line 260 <- DESTROY(DBI::db=HASH(0x1cf2874))= ( undef ) [1 items] at Execute.pm line 312 ok 25 - ... logger: trace_msg # <----- execute_request gofer receive_response DBI::db=HASH(0x1ca4914) trace level set to 0x0/1 (DBI @ 0x100/0) in DBI 1.616-ithread (pid 5172) ok 26 - ... logger: close doesn't close # ok 27 - ... logger: trace_msg after change trace output # Next logline <- disconnect= ( 1 ) [1 items] at 19fhtrace.t line 164 <- DESTROY(DBI::db=HASH(0x1ca4914))= ( undef ) [1 items] 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 - connect ok 2 - Profile and DBI_PROFILE not set 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', '1295500792.00788', '1295500792.00788' ] } } }, 'DBI::Profile' ) ok 6 ok 7 ok 8 - on at connect, 1 key ok 9 - on at connect, 1 key ok 10 - STORE is ref dbi_profile bless( { 'Path' => [ '!Statement', '!MethodName' ], 'Data' => { '' => { 'connected' => [ 1, '0', '0', '0', '0', '1295500792.00788', '1295500792.00788' ], 'STORE' => [ 5, '0', '0', '0', '0', '1295500792.00788', '1295500792.00788' ] }, 'Hi mom' => { 'my_method_name' => [ 1, '1', '1', '1', '1', '1295500792.00788', '1295500792.00788' ] } } }, 'DBI::Profile' ) ok 11 - avoid rounding, 1 key ok 12 - avoid rounding, 1 dummy statement ok 13 - dummy method name is array 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 1295500792.00788 1295500792.00788 ok 17 2 3 1 1 2 1295500792.00788 1295500792.00788 ok 18 Test collected profile data bless( { 'Path' => [ '!Statement' ], 'Data' => { 'set foo=1' => [ 1, '0', '0', '0', '0', '1295500792.28913', '1295500792.28913' ], '' => [ 6, '0', '0', '0', '0', '1295500792.00788', '1295500792.00788' ], 'select mode,size,name from ?' => [ 2301, '0.25', '0', '0', '0.015625', '1295500792.00788', '1295500792.28913' ] } }, 'DBI::Profile' ) ok 19 - profile data ok 20 - ARRAY ref ok 21 - 7 elements ok 22 - all 7 defined ok 23 - all 7 numeric ok 24 - count is 3 ok 25 - total > first ok 26 - total > longest ok 27 - longest > 0 ok 28 - longest > shortest ok 29 - time1 later than start time ok 30 - time2 later than start time ok 31 - time1 <= time2 ok 32 - next > time1 ok 33 - next > time2 ok 34 - profile Test profile format Profile Output DBI::Profile: 0.250000s 88.89% (2308 calls) zvg_40profile.t @ 2011-01-19 21:19:52 '' => 0.000000s / 6 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s) 'select mode,size,name from ?' => 0.250000s / 2301 = 0.000109s avg (first 0.000000s, min 0.000000s, max 0.015625s) 'set foo=1' => 0.000000s ok 35 - non zero length ok 36 - DBI::Profile ok 37 - some calls ok 38 - calls >= count ok 39 - username stored ok 40 ok 41 - should have 8 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 - as_text ok 55 - as_text sortsub ok 56 - as_text general DBI::Profile: 2.000000s 200.00% (203 calls) zvg_40profile.t @ 2011-01-19 21:19:53 '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 - merged nodes ok 58 - merged time ok 59 - merged time foo/bar ok 60 - merged nodes foo/bar time DBI::Profile: 0.000000s 0.00% (11 calls) zvg_40profile.t @ 2011-01-19 21:19:53 'foo' => 'DESTROY' => '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 = 6 0 0 0 0 1295500793.19538 1295500793.19538 + 1 select mode,size,name from ? = 2 0 0 0 0 1295500793.211 1295500793.211 + 1 = 1 0 0 0 0 1295500793.211 1295500793.211 + 1 select mode,size,name from ? = 46 0 0 0 0 1295500793.211 1295500793.211 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% (112 calls) zvg_43prof_env.t @ 2011-01-19 21:19:55 '' => 'DESTROY' => 0.000000s / 3 = 0.000000s avg (first 0.000000s, min 0.000000s, max 0.000000s) 'FETCH' => 0.000000s / 20 = 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_48dbi_dbd_sqlengine.t ..... ok 1 - use DBI; ok 2 - use DBI::DBD::SqlEngine; ok 3 - use DBD::File; ok 4 - prepare 'CREATE TABLE foo (id INT, foo TEXT)' ok 5 - prepare 'CREATE TABLE bar (id INT, baz TEXT)' ok 6 - prepare 'INSERT INTO foo VALUES (1, "Hello world")' ok 7 - prepare 'INSERT INTO bar VALUES (1, "Bugfixes welcome")' ok 8 - prepare 'INSERT bar VALUES (2, "Bug reports, too")' ok 9 - prepare 'SELECT foo FROM foo where ID=1' ok 10 - prepare 'UPDATE bar SET id=5 WHERE baz="Bugfixes welcome"' ok 11 - prepare 'DELETE FROM foo' ok 12 - prepare 'DELETE FROM bar WHERE baz="Bugfixes welcome"' ok 13 - Junk: prepare 'Junk' ok 14 - missing table: prepare 'CREATE foo (id INT, foo TEXT)' ok 15 - missing "VALUES": prepare 'INSERT INTO bar (1, "Bugfixes welcome")' ok 16 - missing "SET": prepare 'UPDATE bar id=5 WHERE baz="Bugfixes welcome"' ok 17 - waste between "DELETE" and "FROM": prepare 'DELETE * FROM foo' ok 18 # skip Not running with SQL::Statement ok 19 # skip Not running with SQL::Statement ok 20 # skip Not running with SQL::Statement 1..20 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5696\t_sbdgf_53442gz.txt ok 11 - drop manually created table db_5696_2 (first file) ok 12 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5696\db_5696_2.txt removed ok 13 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5696\db_5696_2 exists ok 14 - drop manually created table db_5696_2 (second file) ok 15 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5696\db_5696_2 removed ok 16 - Create table db_5696_ 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_5696_ ok 26 # skip method intrusion didn't work with proxying ok 27 - Prepare select * from DB_5696_ 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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 ok 9 - fred.dir removed 1..9 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(0x185f47c) dbh DBI::db=HASH(0x1c6b02c) sth DBI::st=HASH(0x1ccbecc) sth DBI::st=HASH(0x1b2c4fc) sth DBI::st=HASH(0x190af44) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5244;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5244;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(0x323c8e4) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5244;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5244;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(0x3267a3c) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5244;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5244;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(0x3258b1c) 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..45 ok 1 - result, undef ok 2 - json undef ok 3 - discard works, undef ok 4 - result, invalid sql type ok 5 - json invalid sql type ok 6 - result, non numeric cast to int ok 7 - json non numeric cast to int ok 8 - result, non numeric cast to int (strict) ok 9 - json non numeric cast to int (strict) ok 10 - result, small int cast to int ok 11 - json small int cast to int ok 12 - result, 2 byte max signed int cast to int ok 13 - json 2 byte max signed int cast to int ok 14 - result, 2 byte max unsigned int cast to int ok 15 - json 2 byte max unsigned int cast to int ok 16 - result, 4 byte max signed int cast to int ok 17 - json 4 byte max signed int cast to int ok 18 - result, 4 byte max unsigned int cast to int ok 19 - json 4 byte max unsigned int cast to int ok 20 - result, small int cast to int (discard) ok 21 - json small int cast to int (discard) ok 22 - discard works, small int cast to int (discard) ok 23 - result, non numeric cast to numeric ok 24 - json non numeric cast to numeric ok 25 - result, non numeric cast to numeric (strict) ok 26 - json non numeric cast to numeric (strict) ok 27 - result, very large int cast to int ok 28 - json very large int cast to int ok 29 - result, very large int cast to int (strict) ok 30 - json very large int cast to int (strict) ok 31 - result, float cast to int ok 32 - json float cast to int ok 33 - result, float cast to int (strict) ok 34 - json float cast to int (strict) ok 35 - result, float cast to double ok 36 - json float cast to double ok 37 - nv defined float cast to double ok 38 - result, 4 byte max unsigned int cast to int (ivsize=4) ok 39 - json 4 byte max unsigned int cast to int (ivsize=4) ok 40 - result, non numeric cast to double ok 41 - json non numeric cast to double ok 42 - nv not defined non numeric cast to double ok 43 - result, non numeric cast to double (strict) ok 44 - json non numeric cast to double (strict) ok 45 - nv not defined non numeric cast to double (strict) ok t/zvn_48dbi_dbd_sqlengine.t ..... ok 1 - use DBI; ok 2 - use DBI::DBD::SqlEngine; ok 3 - use DBD::File; ok 4 - prepare 'CREATE TABLE foo (id INT, foo TEXT)' ok 5 - prepare 'CREATE TABLE bar (id INT, baz TEXT)' ok 6 - prepare 'INSERT INTO foo VALUES (1, "Hello world")' ok 7 - prepare 'INSERT INTO bar VALUES (1, "Bugfixes welcome")' ok 8 - prepare 'INSERT bar VALUES (2, "Bug reports, too")' ok 9 - prepare 'SELECT foo FROM foo where ID=1' ok 10 - prepare 'UPDATE bar SET id=5 WHERE baz="Bugfixes welcome"' ok 11 - prepare 'DELETE FROM foo' ok 12 - prepare 'DELETE FROM bar WHERE baz="Bugfixes welcome"' ok 13 - Junk: prepare 'Junk' ok 14 - missing table: prepare 'CREATE foo (id INT, foo TEXT)' ok 15 - missing "VALUES": prepare 'INSERT INTO bar (1, "Bugfixes welcome")' ok 16 - missing "SET": prepare 'UPDATE bar id=5 WHERE baz="Bugfixes welcome"' ok 17 - waste between "DELETE" and "FROM": prepare 'DELETE * FROM foo' ok 18 # skip Not running with SQL::Statement ok 19 # skip Not running with SQL::Statement ok 20 # skip Not running with SQL::Statement 1..20 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5088\t_sbdgf_53442gz.txt ok 11 - drop manually created table db_5088_2 (first file) ok 12 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5088\db_5088_2.txt removed ok 13 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5088\db_5088_2 exists ok 14 - drop manually created table db_5088_2 (second file) ok 15 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5088\db_5088_2 removed ok 16 - Create table db_5088_ 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_5088_ ok 26 - execute on db_5088_ ok 27 - Prepare select * from DB_5088_ ok 28 - execute on DB_5088_ 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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 - fred.pag exists ok 5 - insert into mixed case table ok 6 - insert into uppercase table ok 7 - rows found via cloned mixed case table ok 8 - drop table ok 9 - rows found via mixed case table ok 10 # skip quoted identifiers aren't supported by DBI::SQL::Nano ok 11 - disconnect ok 12 - rows found after reconnect using "dbm_tables" ok 13 - drop table ok 14 - fred.dir removed ok 15 - fred.pag removed 1..15 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_6080;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_6080;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(0x3020854) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_6080;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_6080;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(0x1eeaa1c) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_6080;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_6080;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(0x3021004) 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.95 has a bug ok 102 # skip Seems like your Math::BigInt 1.95 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(0x19c9d54)) 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(0x1e8765c) after take_imp_data() ok 107 - ... our Driver should be undefined warn: Can't call FETCH method on handle DBI::db=HASH(0x1e8765c) after take_imp_data() ok 108 - ... our TraceLevel should be undefined warn: Can't call disconnect method on handle DBI::db=HASH(0x1e8765c) after take_imp_data() ok 109 - ... disconnect should return undef warn: Can't call quote method on handle DBI::db=HASH(0x1e8765c) 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(0x1a466b4), 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(0x1a466b4), 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(0x1a466b4), 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(0x1a466b4), 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(0x1a466b4), 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(0x1a466b4), 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(0x1a466b4), 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 = 2618 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(0x1f2170c)->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(0x1f2170c)->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(0x1ec312c), 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(0x1ec312c), 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(0x1ec312c), 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(0x1ec312c), 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(0x1e6edbc) trace level set to 1 in DBI 1.616 (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(0x1e6edbc) trace level set to 1 in DBI 1.616 (PurePerl) # Full trace not available because DBI_TRACE is not in environment # Layered logline # # DBI::db=HASH(0x1e6edbc) trace level set to 1 in DBI 1.616 (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(0x1e6edbc) trace level set to 1 in DBI 1.616 (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(0x1e6edbc) trace level set to 1 in DBI 1.616 (PurePerl) # Full trace not available because DBI_TRACE is not in environment # Layered logline # # ok 25 - ... logger: trace_msg # DBI::db=HASH(0x1e6edbc) trace level set to 1 in DBI 1.616 (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_48dbi_dbd_sqlengine.t ..... ok 1 - use DBI; ok 2 - use DBI::DBD::SqlEngine; ok 3 - use DBD::File; ok 4 - prepare 'CREATE TABLE foo (id INT, foo TEXT)' ok 5 - prepare 'CREATE TABLE bar (id INT, baz TEXT)' ok 6 - prepare 'INSERT INTO foo VALUES (1, "Hello world")' ok 7 - prepare 'INSERT INTO bar VALUES (1, "Bugfixes welcome")' ok 8 - prepare 'INSERT bar VALUES (2, "Bug reports, too")' ok 9 - prepare 'SELECT foo FROM foo where ID=1' ok 10 - prepare 'UPDATE bar SET id=5 WHERE baz="Bugfixes welcome"' ok 11 - prepare 'DELETE FROM foo' ok 12 - prepare 'DELETE FROM bar WHERE baz="Bugfixes welcome"' ok 13 - Junk: prepare 'Junk' ok 14 - missing table: prepare 'CREATE foo (id INT, foo TEXT)' ok 15 - missing "VALUES": prepare 'INSERT INTO bar (1, "Bugfixes welcome")' ok 16 - missing "SET": prepare 'UPDATE bar id=5 WHERE baz="Bugfixes welcome"' ok 17 - waste between "DELETE" and "FROM": prepare 'DELETE * FROM foo' ok 18 # skip Not running with SQL::Statement ok 19 # skip Not running with SQL::Statement ok 20 # skip Not running with SQL::Statement 1..20 ok 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_724\t_sbdgf_53442gz.txt ok 11 - drop manually created table db_724_2 (first file) ok 12 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_724\db_724_2.txt removed ok 13 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_724\db_724_2 exists ok 14 - drop manually created table db_724_2 (second file) ok 15 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_724\db_724_2 removed ok 16 - Create table db_724_ 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_724_ ok 26 - execute on db_724_ ok 27 - Prepare select * from DB_724_ ok 28 - execute on DB_724_ 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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 - fred.pag exists ok 5 - insert into mixed case table ok 6 - insert into uppercase table ok 7 - rows found via cloned mixed case table ok 8 - drop table ok 9 - rows found via mixed case table ok 10 # skip quoted identifiers aren't supported by DBI::SQL::Nano ok 11 - disconnect ok 12 - rows found after reconnect using "dbm_tables" ok 13 - drop table ok 14 - fred.dir removed ok 15 - fred.pag removed 1..15 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(0x1df9074) dbh DBI::db=HASH(0x1e576e4) sth DBI::st=HASH(0x1e4f25c) sth DBI::st=HASH(0x1e4f8bc) sth DBI::st=HASH(0x1e1e6ec) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4612;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4612;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(0x251ee84) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4612;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4612;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(0x24f32ec) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4612;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4612;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(0x252ebbc) 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(0x1e31204) 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..32 ok 1 - result, undef ok 2 # skip DiscardString not supported in PurePerl ok 3 # skip DiscardString not supported in PurePerl ok 4 - result, invalid sql type ok 5 - json invalid sql type ok 6 - result, non numeric cast to int ok 7 - json non numeric cast to int ok 8 - result, non numeric cast to int (strict) ok 9 - json non numeric cast to int (strict) ok 10 - result, small int cast to int ok 11 - json small int cast to int ok 12 - result, 2 byte max signed int cast to int ok 13 - json 2 byte max signed int cast to int ok 14 - result, 2 byte max unsigned int cast to int ok 15 - json 2 byte max unsigned int cast to int ok 16 - result, 4 byte max signed int cast to int ok 17 - json 4 byte max signed int cast to int ok 18 - result, 4 byte max unsigned int cast to int ok 19 - json 4 byte max unsigned int cast to int ok 20 - result, small int cast to int (discard) ok 21 # skip DiscardString not supported in PurePerl ok 22 # skip DiscardString not supported in PurePerl ok 23 - result, non numeric cast to numeric ok 24 - json non numeric cast to numeric ok 25 - result, non numeric cast to numeric (strict) ok 26 - json non numeric cast to numeric (strict) ok 27 - result, non numeric cast to double ok 28 - json non numeric cast to double ok 29 - nv not defined non numeric cast to double ok 30 - result, non numeric cast to double (strict) ok 31 - json non numeric cast to double (strict) ok 32 - nv not defined non numeric cast to double (strict) ok t/zvxgn_48dbi_dbd_sqlengine.t ... ok 1 - use DBI; ok 2 - use DBI::DBD::SqlEngine; ok 3 - use DBD::File; ok 4 - prepare 'CREATE TABLE foo (id INT, foo TEXT)' ok 5 - prepare 'CREATE TABLE bar (id INT, baz TEXT)' ok 6 - prepare 'INSERT INTO foo VALUES (1, "Hello world")' ok 7 - prepare 'INSERT INTO bar VALUES (1, "Bugfixes welcome")' ok 8 - prepare 'INSERT bar VALUES (2, "Bug reports, too")' ok 9 - prepare 'SELECT foo FROM foo where ID=1' ok 10 - prepare 'UPDATE bar SET id=5 WHERE baz="Bugfixes welcome"' ok 11 - prepare 'DELETE FROM foo' ok 12 - prepare 'DELETE FROM bar WHERE baz="Bugfixes welcome"' ok 13 - Junk: prepare 'Junk' ok 14 - missing table: prepare 'CREATE foo (id INT, foo TEXT)' ok 15 - missing "VALUES": prepare 'INSERT INTO bar (1, "Bugfixes welcome")' ok 16 - missing "SET": prepare 'UPDATE bar id=5 WHERE baz="Bugfixes welcome"' ok 17 - waste between "DELETE" and "FROM": prepare 'DELETE * FROM foo' ok 18 # skip Not running with SQL::Statement ok 19 # skip Not running with SQL::Statement ok 20 # skip Not running with SQL::Statement 1..20 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_2884\t_sbdgf_53442gz.txt ok 11 - drop manually created table db_2884_2 (first file) ok 12 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_2884\db_2884_2.txt removed ok 13 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_2884\db_2884_2 exists ok 14 - drop manually created table db_2884_2 (second file) ok 15 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_2884\db_2884_2 removed ok 16 - Create table db_2884_ 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_2884_ ok 26 # skip method intrusion didn't work with proxying ok 27 - Prepare select * from DB_2884_ 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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 ok 9 - fred.dir removed 1..9 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4268;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4268;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(0x1f0b834) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4268;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4268;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(0x303d564) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4268;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4268;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(0x1f169f4) 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_48dbi_dbd_sqlengine.t .. ok 1 - use DBI; ok 2 - use DBI::DBD::SqlEngine; ok 3 - use DBD::File; ok 4 - prepare 'CREATE TABLE foo (id INT, foo TEXT)' ok 5 - prepare 'CREATE TABLE bar (id INT, baz TEXT)' ok 6 - prepare 'INSERT INTO foo VALUES (1, "Hello world")' ok 7 - prepare 'INSERT INTO bar VALUES (1, "Bugfixes welcome")' ok 8 - prepare 'INSERT bar VALUES (2, "Bug reports, too")' ok 9 - prepare 'SELECT foo FROM foo where ID=1' ok 10 - prepare 'UPDATE bar SET id=5 WHERE baz="Bugfixes welcome"' ok 11 - prepare 'DELETE FROM foo' ok 12 - prepare 'DELETE FROM bar WHERE baz="Bugfixes welcome"' ok 13 - Junk: prepare 'Junk' ok 14 - missing table: prepare 'CREATE foo (id INT, foo TEXT)' ok 15 - missing "VALUES": prepare 'INSERT INTO bar (1, "Bugfixes welcome")' ok 16 - missing "SET": prepare 'UPDATE bar id=5 WHERE baz="Bugfixes welcome"' ok 17 - waste between "DELETE" and "FROM": prepare 'DELETE * FROM foo' ok 18 # skip Not running with SQL::Statement ok 19 # skip Not running with SQL::Statement ok 20 # skip Not running with SQL::Statement 1..20 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5708\t_sbdgf_53442gz.txt ok 11 - drop manually created table db_5708_2 (first file) ok 12 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5708\db_5708_2.txt removed ok 13 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5708\db_5708_2 exists ok 14 - drop manually created table db_5708_2 (second file) ok 15 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5708\db_5708_2 removed ok 16 - Create table db_5708_ 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_5708_ ok 26 # skip method intrusion didn't work with proxying ok 27 - Prepare select * from DB_5708_ 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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 ok 9 - fred.dir removed 1..9 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_3252;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_3252;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(0x2322144) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_3252;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_3252;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(0x22f5e0c) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_3252;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_3252;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(0x234ee94) 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.95 has a bug ok 102 # skip Seems like your Math::BigInt 1.95 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(0x19ca5dc)) 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(0x1ecb394), 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(0x1ecb394), 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(0x1ecb394), 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(0x1ecb394), 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(0x1ecb394), 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(0x1ecb394), 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(0x1ecb394), 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 = 10789 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(0x2152524)->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(0x2152664)->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(0x1f3b8a4), 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(0x1f3b8a4), 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(0x1f3b8a4), 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(0x1f3b8a4), 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(0x201ddd4) trace level set to 1 in DBI 1.616 (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(0x201ddd4) trace level set to 1 in DBI 1.616 (PurePerl) # Full trace not available because DBI_TRACE is not in environment # Layered logline # # DBI::db=HASH(0x201ddd4) trace level set to 1 in DBI 1.616 (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(0x201ddd4) trace level set to 1 in DBI 1.616 (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(0x201ddd4) trace level set to 1 in DBI 1.616 (PurePerl) # Full trace not available because DBI_TRACE is not in environment # Layered logline # # -----> execute_request -> DBI->connect(dbi:ExampleP:dummy, , ****, HASH(0x205f874)) <- connect= DBI::db=HASH(0x203fabc) _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(0x201ddd4) trace level set to 1 in DBI 1.616 (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_48dbi_dbd_sqlengine.t ... ok 1 - use DBI; ok 2 - use DBI::DBD::SqlEngine; ok 3 - use DBD::File; ok 4 - prepare 'CREATE TABLE foo (id INT, foo TEXT)' ok 5 - prepare 'CREATE TABLE bar (id INT, baz TEXT)' ok 6 - prepare 'INSERT INTO foo VALUES (1, "Hello world")' ok 7 - prepare 'INSERT INTO bar VALUES (1, "Bugfixes welcome")' ok 8 - prepare 'INSERT bar VALUES (2, "Bug reports, too")' ok 9 - prepare 'SELECT foo FROM foo where ID=1' ok 10 - prepare 'UPDATE bar SET id=5 WHERE baz="Bugfixes welcome"' ok 11 - prepare 'DELETE FROM foo' ok 12 - prepare 'DELETE FROM bar WHERE baz="Bugfixes welcome"' ok 13 - Junk: prepare 'Junk' ok 14 - missing table: prepare 'CREATE foo (id INT, foo TEXT)' ok 15 - missing "VALUES": prepare 'INSERT INTO bar (1, "Bugfixes welcome")' ok 16 - missing "SET": prepare 'UPDATE bar id=5 WHERE baz="Bugfixes welcome"' ok 17 - waste between "DELETE" and "FROM": prepare 'DELETE * FROM foo' ok 18 # skip Not running with SQL::Statement ok 19 # skip Not running with SQL::Statement ok 20 # skip Not running with SQL::Statement 1..20 ok 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5944\t_sbdgf_53442gz.txt ok 11 - drop manually created table db_5944_2 (first file) ok 12 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5944\db_5944_2.txt removed ok 13 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5944\db_5944_2 exists ok 14 - drop manually created table db_5944_2 (second file) ok 15 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5944\db_5944_2 removed ok 16 - Create table db_5944_ 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_5944_ ok 26 # skip method intrusion didn't work with proxying ok 27 - Prepare select * from DB_5944_ 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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 ok 9 - fred.dir removed 1..9 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(0x1e9c694) dbh DBI::db=HASH(0x206fda4) sth DBI::st=HASH(0x2051b7c) sth DBI::st=HASH(0x205577c) sth DBI::st=HASH(0x205608c) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4100;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4100;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(0x25518a4) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4100;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4100;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(0x252768c) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4100;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4100;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(0x257bcdc) 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..32 ok 1 - result, undef ok 2 # skip DiscardString not supported in PurePerl ok 3 # skip DiscardString not supported in PurePerl ok 4 - result, invalid sql type ok 5 - json invalid sql type ok 6 - result, non numeric cast to int ok 7 - json non numeric cast to int ok 8 - result, non numeric cast to int (strict) ok 9 - json non numeric cast to int (strict) ok 10 - result, small int cast to int ok 11 - json small int cast to int ok 12 - result, 2 byte max signed int cast to int ok 13 - json 2 byte max signed int cast to int ok 14 - result, 2 byte max unsigned int cast to int ok 15 - json 2 byte max unsigned int cast to int ok 16 - result, 4 byte max signed int cast to int ok 17 - json 4 byte max signed int cast to int ok 18 - result, 4 byte max unsigned int cast to int ok 19 - json 4 byte max unsigned int cast to int ok 20 - result, small int cast to int (discard) ok 21 # skip DiscardString not supported in PurePerl ok 22 # skip DiscardString not supported in PurePerl ok 23 - result, non numeric cast to numeric ok 24 - json non numeric cast to numeric ok 25 - result, non numeric cast to numeric (strict) ok 26 - json non numeric cast to numeric (strict) ok 27 - result, non numeric cast to double ok 28 - json non numeric cast to double ok 29 - nv not defined non numeric cast to double ok 30 - result, non numeric cast to double (strict) ok 31 - json non numeric cast to double (strict) ok 32 - nv not defined non numeric cast to double (strict) ok t/zvxnp_48dbi_dbd_sqlengine.t ... ok 1 - use DBI; ok 2 - use DBI::DBD::SqlEngine; ok 3 - use DBD::File; ok 4 - prepare 'CREATE TABLE foo (id INT, foo TEXT)' ok 5 - prepare 'CREATE TABLE bar (id INT, baz TEXT)' ok 6 - prepare 'INSERT INTO foo VALUES (1, "Hello world")' ok 7 - prepare 'INSERT INTO bar VALUES (1, "Bugfixes welcome")' ok 8 - prepare 'INSERT bar VALUES (2, "Bug reports, too")' ok 9 - prepare 'SELECT foo FROM foo where ID=1' ok 10 - prepare 'UPDATE bar SET id=5 WHERE baz="Bugfixes welcome"' ok 11 - prepare 'DELETE FROM foo' ok 12 - prepare 'DELETE FROM bar WHERE baz="Bugfixes welcome"' ok 13 - Junk: prepare 'Junk' ok 14 - missing table: prepare 'CREATE foo (id INT, foo TEXT)' ok 15 - missing "VALUES": prepare 'INSERT INTO bar (1, "Bugfixes welcome")' ok 16 - missing "SET": prepare 'UPDATE bar id=5 WHERE baz="Bugfixes welcome"' ok 17 - waste between "DELETE" and "FROM": prepare 'DELETE * FROM foo' ok 18 # skip Not running with SQL::Statement ok 19 # skip Not running with SQL::Statement ok 20 # skip Not running with SQL::Statement 1..20 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4900\t_sbdgf_53442gz.txt ok 11 - drop manually created table db_4900_2 (first file) ok 12 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4900\db_4900_2.txt removed ok 13 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4900\db_4900_2 exists ok 14 - drop manually created table db_4900_2 (second file) ok 15 - C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_4900\db_4900_2 removed ok 16 - Create table db_4900_ 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_4900_ ok 26 - execute on db_4900_ ok 27 - Prepare select * from DB_4900_ ok 28 - execute on DB_4900_ 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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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.03 using DBI::SQL::Nano 1.014600 # DBI 1.616 # DBI::PurePerl 2.014285 # OS MSWin32 (5.00) # Perl 5.012000 (MSWin32-x86-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 - fred.pag exists ok 5 - insert into mixed case table ok 6 - insert into uppercase table ok 7 - rows found via cloned mixed case table ok 8 - drop table ok 9 - rows found via mixed case table ok 10 # skip quoted identifiers aren't supported by DBI::SQL::Nano ok 11 - disconnect ok 12 - rows found after reconnect using "dbm_tables" ok 13 - drop table ok 14 - fred.dir removed ok 15 - fred.pag removed 1..15 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5472;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5472;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(0x22f1314) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5472;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5472;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(0x22c504c) 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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5472;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-5.12\var\cpan\build\DBI-1.616-C4vu8x\test_output_5472;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(0x22fc3ac) 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=178, Tests=9303, 49 wallclock secs ( 2.30 usr + 0.66 sys = 2.95 CPU) Result: PASS C:\Perl-5.12\bin\perl.exe "-Iblib\lib" "-Iblib\arch" test.pl test.pl DBI test application $Revision: 12537 $ Switch: DBI 1.616 by Tim Bunce, 1.616 Available Drivers: ADO, AnyData, CSV, Chart, DBM, ExampleP, Excel, File, Gofer, LDAP, Log, MVS_FTPSQL, Mimer, Mock, Multiplex, ODBC, Oracle, Ovrimos, PO, PgPP, Proxy, SQLite, Sponge, Sprite, Sys, TSM, Template, TemplateSS, WMI, Wire10, XBase, 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.012000 MSWin32-x86-multi-thread (cl 12.00.8804 -MD -Zi -DNDEBUG -O1) 0.000019s test.pl done TIMB/DBI-1.616.tar.gz nmake test TEST_VERBOSE=1 -- OK PPD for DBI-1.616 already made Running test for module 'DBD::DBM' Running make for T/TI/TIMB/DBI-1.616.tar.gz Prepending C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/arch C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/lib to PERL5LIB for 'get' Has already been unwrapped into directory C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x Prepending C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/arch C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/lib to PERL5LIB for 'make' Has already been made Prepending C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/arch C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/lib to PERL5LIB for 'test' Running make test Has already been tested successfully Running test for module 'DBD::File' Running make for T/TI/TIMB/DBI-1.616.tar.gz Prepending C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/arch C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/lib to PERL5LIB for 'get' Has already been unwrapped into directory C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x Prepending C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/arch C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/lib to PERL5LIB for 'make' Has already been made Prepending C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/arch C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/lib to PERL5LIB for 'test' Running make test Has already been tested successfully Running make for R/RE/REHSACK/SQL-Statement-1.32.tar.gz Prepending C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/arch C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/lib to PERL5LIB for 'get' Has already been unwrapped into directory C:\cpanfly-5.12\var\cpan\build\SQL-Statement-1.32-SQ4aMe Prepending C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/arch C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/lib to PERL5LIB for 'make' Could not make: cannot resolve circular dependency Prepending C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/arch C:\cpanfly-5.12\var\cpan\build\DBI-1.616-C4vu8x/blib/lib to PERL5LIB for 'test' Running make test Can't test without successful make Finished 2011-01-19T21:20:27