[Dbix-class] dbix-class doesn't seem to be getting server info for oracle ...

[Roger Day]

I'm trying to use a Oracle driver with the DBIx::Class and I am having
issues with the following line:

  return 1
    if $self->_server_info->{normalized_dbms_version} >=3D 8.001;

which doesn't seem to be set ....

Use of uninitialized value in numeric ge (>=3D) at
/usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/Storage/DBI/Oracle/Generic.=
pm
line 93.
 at
/usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/Storage/DBI/Oracle/Generic.=
pm
line 93

DBIx::Class::Storage::DBI::Oracle::Generic::_determine_supports_insert_retu=
rning('DBIx::Class::Storage::DBI::Oracle::WhereJoins=3DHASH(0x1110a03b0)')
called at /usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/Storage/DBI.pm
line 1057

DBIx::Class::Storage::DBI::get_dbms_capability('DBIx::Class::Storage::DBI::=
Oracle::WhereJoins=3DHASH(0x1110a03b0)',
'_supports_insert_returning') called at
/usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/Storage/DBI.pm line 1042

DBIx::Class::Storage::DBI::get_use_dbms_capability('DBIx::Class::Storage::D=
BI::Oracle::WhereJoins=3DHASH(0x1110a03b0)',
'_use_insert_returning') called at (eval
82)[/usr/opt/perl5/lib64/site_perl/5.8.8/Class/Accessor/Grouped.pm:800] line
2

DBIx::Class::Storage::DBI::_use_insert_returning('DBIx::Class::Storage::DBI=
::Oracle::WhereJoins=3DHASH(0x1110a03b0)')
called at /usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/Storage/DBI.pm
line 1655

DBIx::Class::Storage::DBI::insert('DBIx::Class::Storage::DBI::Oracle::Where=
Joins=3DHASH(0x1110a03b0)',
'DBIx::Class::ResultSource::Table=3DHASH(0x11141b590)', 'HASH(0x11127ebd0)')
called at /usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/Row.pm line 350

DBIx::Class::Row::insert('DSTI::CPP::Schema::Result::Events=3DHASH(0x110f0a=
040)')
called at /usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/ResultSet.pm line
2690

DBIx::Class::ResultSet::create('DBIx::Class::ResultSet=3DHASH(0x110f09f10)',
'HASH(0x1117d8910)') called at
/usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/ResultSet.pm line 1980

DBIx::Class::ResultSet::populate('DBIx::Class::ResultSet=3DHASH(0x110f09f10=
)',
'ARRAY(0x1117d8f20)') called at
/usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/Schema.pm line 791
        DBIx::Class::Schema::populate('DSTI::CPP::Schema=3DHASH(0x111281530=
)',
'Events', 'ARRAY(0x1117d8f20)') called at (eval
106)[/usr/opt/perl5/lib64/5.8.8/perl5db.pl:628] line 2
        eval '($@, $!, $^E, $,, $/, $\\, $^W) =3D @saved;package main; $^D =
=3D
$^D | $DB::db_stop;
$handle->populate(\'Events\', [{Stream=3D>\'hhhh\'}]);;

;' called at /usr/opt/perl5/lib64/5.8.8/perl5db.pl line 628
        DB::eval called at /usr/opt/perl5/lib64/5.8.8/perl5db.pl line 3410
        DB::DB called at ./bin/t.pl line 11
DBD::Oracle::AUTOLOAD(/usr/opt/perl5/lib64/site_perl/5.8.8/aix-thread-multi=
-64all/DBD/Oracle.pm:97):
97:             (my $constname =3D $AUTOLOAD) =3D~ s/.*:://;
100 levels deep in subroutine calls!

Can someone help me, please?

Roger
-------------- next part --------------
An HTML attachment was scrubbed...
URL: http://lists.scsys.co.uk/pipermail/dbix-class/attachments/20111018/7f9=
d5cc9/attachment.htm