On Wed, 2007-03-28 at 15:59 -0500, Scott T. Hildreth wrote: > On Wed, 2007-03-28 at 21:26 +0100, Tim Bunce wrote: > > On Wed, Mar 28, 2007 at 01:54:51PM -0500, Scott T. Hildreth wrote: > > > I should also mention that this is a $dbh->do( "an insert statement"). > > > A quick look at DBI::ProxyServer, shows that the NUMFIELDS indicates > > > a select, therefore in this case 'undef' would be returned for an > > > insert. Should it be initialized to '0', to quite warnings on > > > non-selects? > > > > That would work. As would: > > > > $sth->SUPER::STORE('NUM_OF_FIELDS' => $numFields) if $numFields; > > > > Doing both would make life easier for people who can't upgrade client > > and server at the same time. > > Do think if I updated my server this would go away?
..Never mind, I misread the above statement. > > The proxy server is, > > Perl : 5.008008 (i686-linux) > OS : linux (2.6.14.6) > DBI : 1.50 > DBD::mysql : 3.0002 > DBD::Sponge : 11.10 > DBD::SQLite : 1.11 > DBD::Proxy : 0.2004 > DBD::Oracle : 1.19 > DBD::Multiplex : 1.98 > DBD::File : 0.33 > DBD::ExampleP : 11.12 > DBD::DBM : 0.03 > > The calling client is, > > Perl : 5.008008 (i686-linux) > > OS : linux (2.6.17.14-abi) > DBI : 1.52 > DBD::mysql : 3.0008 > DBD::Sponge : 11.10 > DBD::SQLite : 1.13 > DBD::Proxy : 0.2004 > DBD::Oracle : 1.19 > DBD::Multiplex : 1.99 > DBD::File : 0.35 > DBD::ExampleP : 11.12 > DBD::DBM : 0.03 > > > RPC::PlServer are the same version. > > > > > > But I wonder if this is really the issue. Why hasn't anyone reported > > undef warnings on insert statement before? Would be good to add a test > > case to t/80proxy.t that reproduces the problem before you fix it. > > > > Tim. > > > > p.s. Any volunteers to work on a daemon wrapper for DBI::Gofer::Execute > > so it can be used as a replacement for the current DBI proxy server. > > (DBD::Gofer is potentially significantly faster than DBD::Proxy.) > > > > If so please start a new thread and I'll give a brain dump... > > > > > > > On Wed, 2007-03-28 at 13:35 -0500, Scott T. Hildreth wrote: > > > > So I tracked this down further, DBD::Proxy gets an array returned from > > > > the client calling > > > > the server. Which is ultimately put into @outData, and > > > > $outData[0]($numFields) is 'undef' > > > > and produces this warning, > > > > > > > > Use of uninitialized value in subroutine entry at > > > > /usr/local/perl-5.8.8/lib/site_perl/5.8.8/i686-linux/DBD/Proxy.pm > > > > line 566. > > > > > > > > > > > > Here is where @outData is spliced, > > > > > > > > DBD::Proxy::st::execute(/usr/local/perl-5.8.8/lib/site_perl/5.8.8/i686-linux/DBD/Proxy.pm:559): > > > > 559: my ($numFields, $numParams, $names, $types) = > > > > splice(@outData, 0, 4); > > > > > > > > I guess my next step is to run the Proxy server in debug mode and > > > > figure out why numFields > > > > is not filled in. I was hoping someone might know what is going on > > > > before I do that. > > > > > > > > > > > > Thanks > > > > > > > > > > > > On Thu, 2007-01-18 at 15:37 -0600, Scott T. Hildreth wrote: > > > > > ########################################################### > > > > > > > > > > Perl : 5.008008 (i386-freebsd) > > > > > OS : freebsd (6.1-stable) > > > > > DBI : 1.53 > > > > > DBD::mysql : 3.0004 > > > > > DBD::Sponge : 11.10 > > > > > DBD::SQLite : 1.12 > > > > > DBD::Proxy : 0.2004 > > > > > DBD::Multiplex : 2.00 > > > > > DBD::File : 0.35 > > > > > DBD::ExampleP : 11.12 > > > > > DBD::DBM : 0.03 > > > > > DBD::CSV : 0.22 > > > > > DBD::AnyData : 0.08 > > > > > > > > > > ########################################################## > > > > > > > > > > For every database call, do, execute, ...etc I get the warning, > > > > > > > > > > Use of uninitialized value in subroutine entry > > > > > at /usr/local/perl-5.8.8/lib/site_perl/5.8.8/i386-freebsd/DBD/Proxy.pm > > > > > line 567. > > > > > > > > > > Which is " 'NUM_OF_FIELDS' => $numFields, ". > > > > > > > > > > I don't think this matters but, the proxy is connecting to > > > > > DBD::Oracle, > > > > > the connect is in another module that is inherited by the module I am > > > > > testing. > > > > > > > > > > I am also getting disconnect errors on the DESTROY, > > > > > > > > > > (in cleanup) DBD::Proxy::db disconnect failed: Can't call > > > > > method > > > > > "disconnect" on an undefined value > > > > > at /usr/local/perl-5.8.8/lib/site_perl/5.8.8/i386-freebsd/DBD/Proxy.pm > > > > > line 311 during global destruction. > > > > > > > > > > (in cleanup) DBD::Proxy::db DESTROY failed: Can't call method > > > > > "disconnect" on an undefined value > > > > > at /usr/local/perl-5.8.8/lib/site_perl/5.8.8/i386-freebsd/DBD/Proxy.pm > > > > > line 311 during global destruction. > > > > > > > > > > > > > > > My eyes are glazing over, so any help would be appreciated. I'm sure > > > > > it > > > > > is something simple I am missing here... > > > > > > > > > > > > > > > Thanks. > > > > > > > > > > > > > -- > > > Scott T. Hildreth <[EMAIL PROTECTED]> -- Scott T. Hildreth <[EMAIL PROTECTED]>