What are your DBD::Oracle and DBIx::Class versions?
Am 2011-10-18 18:04, schrieb 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} >= 8.001;
which doesn't seem to be set ....
Use of uninitialized value in numeric ge (>=) 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_returning('DBIx::Class::Storage::DBI::Oracle::WhereJoins=HASH(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=HASH(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::DBI::Oracle::WhereJoins=HASH(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=HASH(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::WhereJoins=HASH(0x1110a03b0)',
'DBIx::Class::ResultSource::Table=HASH(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=HASH(0x110f0a040)')
called at /usr/opt/perl5/lib64/site_perl/5.8.8/DBIx/Class/ResultSet.pm line 2690
DBIx::Class::ResultSet::create('DBIx::Class::ResultSet=HASH(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=HASH(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=HASH(0x111281530)', 'Events',
'ARRAY(0x1117d8f20)') called at (eval
106)[/usr/opt/perl5/lib64/5.8.8/perl5db.pl:628<http://perl5db.pl:628>] line 2
eval '($@, $!, $^E, $,, $/, $\\, $^W) = @saved;package main; $^D = $^D |
$DB::db_stop;
$handle->populate(\'Events\', [{Stream=>\'hhhh\'}]);;
;' called at /usr/opt/perl5/lib64/5.8.8/perl5db.pl<http://perl5db.pl> line 628
DB::eval called at
/usr/opt/perl5/lib64/5.8.8/perl5db.pl<http://perl5db.pl> line 3410
DB::DB called at ./bin/t.pl<http://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 = $AUTOLOAD) =~ s/.*:://;
100 levels deep in subroutine calls!
Can someone help me, please?
Roger
_______________________________________________
List: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/DBIx-Class/
Searchable Archive: http://www.grokbase.com/group/[email protected]
*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*
T-Systems Austria GesmbH Rennweg 97-99, 1030 Wien
Handelsgericht Wien, FN 79340b
*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*
Notice: This e-mail contains information that is confidential and may be
privileged.
If you are not the intended recipient, please notify the sender and then
delete this e-mail immediately.
*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*"*
_______________________________________________
List: http://lists.scsys.co.uk/cgi-bin/mailman/listinfo/dbix-class
IRC: irc.perl.org#dbix-class
SVN: http://dev.catalyst.perl.org/repos/bast/DBIx-Class/
Searchable Archive: http://www.grokbase.com/group/[email protected]
