On Thu 21 Aug 2003 19:31, "Thomas A. Lowery" <[EMAIL PROTECTED]> wrote:
> All tests successful, 6 tests skipped.
> Files=34, Tests=1372, 84 wallclock secs (70.24 cusr +  4.02 csys = 74.26 CPU)
> 
>   Perl            : 5.008
>   OS              : linux
>   DBI             : 1.38
>   DBD::mysql      : 2.1021
>   DBD::Sponge     : 11.09
>   DBD::Proxy      : 0.2004
>   DBD::Pg         : 1.31_3
>   DBD::Oracle     : 1.14
>   DBD::Multiplex  : 0.9
>   DBD::File       : 0.2001
>   DBD::ExampleP   : 11.10
>   DBD::CSV        : 0.2002

Original request got lost in Sobig

This is a *very* recent 5.8.x snapshot (20906) built with gcc-3.3.1/64

h3:/u/usr/merijn 101 > /opt/perl64/bin/perl -MDBI -e 'DBI->installed_versions'
  Perl            : 5.008001    (PA-RISC2.0-LP64)
  OS              : hpux        (11.11)
  DBI             : 1.38
  DBD::Sponge     : 11.09
  DBD::Proxy      : install_driver(Proxy) failed: Can't locate RPC/PlClient.pm in @INC
  DBD::File       : 0.2001
  DBD::ExampleP   : 11.10
  DBD::CSV        : 0.2002
h3:/u/usr/merijn 102 >

One of the reasons I'm still holding on to DBI-1.35 is

Argument "" isn't numeric in null operation at 
/pro/lib/perl5/site_perl/5.8.0/PA-RISC2.0/DBI.pm line 632.

which is caused by attr 'Username' which is either undef or blank

t/27-uni-max......$VAR1 = {
          'Username' => undef
        };
Use of uninitialized value in null operation at 
/pro/lib/perl5/site_perl/5.8.0/PA-RISC2.0/DBI.pm line 633.
t/27-uni-max......ok
t/30-reconnect....$VAR1 = {
          'Username' => ''
        };
Argument "" isn't numeric in null operation at 
/pro/lib/perl5/site_perl/5.8.0/PA-RISC2.0/DBI.pm line 633.
t/30-reconnect....ok 4/9$VAR1 = {
          'Username' => ''
        };
Argument "" isn't numeric in null operation at 
/pro/lib/perl5/site_perl/5.8.0/PA-RISC2.0/DBI.pm line 633.
t/30-reconnect....ok


for now, I've changed that to

            foreach $a (keys %$attr) {
                no warnings;
                $dbh->{$a} = $attr->{$a};
                }

so 

I have rewritten DBD-Unify (with pain in my heart) to replace
$dbh->{DBDverbose} (which IMHO is a perfectly good name, and should be adopted
by all drivers) to $dbh->{uni_verbose} as the documentation requires.

That works, but I'd like to have one intermediate release that warns if
DBDverbose is in use. What would be the best place to do so?


My DBD's depend on my environment, so here's the same thing twice

lep a5:/pro/3gl/CPAN/DBD-Unify-0.25 111 > perl -MDBI -e 'DBI->installed_versions'
  Perl            : 5.008       (PA-RISC2.0)
  OS              : hpux        (11.00)
  DBI             : 1.38
  DBD::Unify      : 0.25
  DBD::Sponge     : 11.09
  DBD::Proxy      : install_driver(Proxy) failed: Can't locate RPC/PlClient.pm in @INC
  DBD::File       : 0.2001
  DBD::ExampleP   : 11.10
  DBD::CSV        : 0.2002
lep a5:/pro/3gl/CPAN/DBD-Unify-0.25 112 >

lep a5:/pro/to/lep/4gl 101 > perl -MDBI -e 'DBI->installed_versions'
  Perl            : 5.008       (PA-RISC2.0)
  OS              : hpux        (11.00)
  DBI             : 1.38
  DBD::Sponge     : 11.09
  DBD::Proxy      : install_driver(Proxy) failed: Can't locate RPC/PlClient.pm in @INC
  DBD::Oracle     : 1.14
  DBD::File       : 0.2001
  DBD::ExampleP   : 11.10
  DBD::CSV        : 0.2002
lep a5:/pro/to/lep/4gl 102 >


-- 
H.Merijn Brand        Amsterdam Perl Mongers (http://amsterdam.pm.org/)
using perl-5.6.1, 5.8.0 & 633 on HP-UX 10.20 & 11.00, AIX 4.2, AIX 4.3,
     WinNT 4, Win2K pro & WinCE 2.11 often with Tk800.024 &/| DBD-Unify
ftp://ftp.funet.fi/pub/languages/perl/CPAN/authors/id/H/HM/HMBRAND/


Reply via email to