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]>
