You are viewing a plain text version of this content. The canonical link for it is here.
Posted to embperl@perl.apache.org by Terrence Brannon <me...@urth.org> on 2003/11/12 02:30:44 UTC
Re: DBIx::Recordset struggles to pass tests
Michael Gray wrote:
>Hs anyone had any luck getting DBIx::Recordset to pass its tests using
>recent versions of perl, DBI and DBD::Oracle?
>
>
Angus Lees and myself have several patches for Recordset, most are
archived in the embperl mailing list.
Gerald was supposed to have a subversion repository setup by now, but
hasn't done it.
>DBI 1.38 seems okay, no need to mess there. Platform is Red Hat Linux 9,
>but with perl built locally. Oracle client is 9.2.0.1.0.
>DBIx::Recordset is 0.24.
>
>I can get DBIx::Recordset to pass its test with perl 5.8.0 and
>DBD::Oracle 1.12.
>
>With DBD::Oracle 1.14, and either perl 5.8.0 or perl 5.8.2,
>DBIx::Recordset fails its tests as follows:
>
>...
>DeleteWithLinks... ok
> - 2 ...
>Test terminated with fatal error! Look at test.log
>
>test.log:
>...
>Clear (Delete all) disabled for table at blib/lib/DBIx/Database.pm line 57
>DBIx::Database::Base::savecroak('DBIx::Recordset=HASH(0x86790f4)','Clear (Delete all) disabled for table ') called at blib/lib/DBIx/Recordset.pm line 2715
>DBIx::Recordset::DeleteWithLinks('DBIx::Recordset=HASH(0x86790f4)','HASH(0x8685b30)','HASH(0x86859f8)') called at blib/lib/DBIx/Recordset.pm line 2760
>DBIx::Recordset::DeleteWithLinks('DBIx::Recordset=HASH(0x867e2fc)','HASH(0x867baf4)') called at test.pl line 1933
>main::DoTest('Oracle','dbi:Oracle:testdb','mjg17/roingtbet','undef') called at test.pl line 3991
>...
>
>With DBD::Oracle 1.12 and perl 5.8.2, DBIx::Recordset fails its tests
>a little later:
>
>...
>Select with sub table... ok
> - 2 ...
>Test terminated with fatal error! Look at test.log
>
>test.log:
>...
>Can't upgrade that kind of scalar at test.pl line 83.
>...
>
>Having to hold back on upgrades for both perl and DBD::Oracle is making me
>uncomfortable. Any tips would be gratefully received.
>
>
>
Hmm, I wonder what could be causing this to happen. I have only open
source databases available, or I would do some testing and patching
myself. There's no free version of Oracle for Windows is there? I run
Cygwin.
>Thanks
>
>
>
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org
Re: DBIx::Recordset struggles to pass tests
Posted by Kee Hinckley <na...@somewhere.com>.
At 5:30 PM -0800 11/11/03, Terrence Brannon wrote:
>>With DBD::Oracle 1.12 and perl 5.8.2, DBIx::Recordset fails its
>>tests a little later:
>>
>>...
>>Select with sub table... ok
>> - 2 ...
>>Test terminated with fatal error! Look at test.log
>>
>>test.log:
>>...
>>Can't upgrade that kind of scalar at test.pl line 83.
DBIx::Recordset .25 (or earlier). Perl 5.8.1. I'm seeing that error
in the following case. I'm fetching a link from a record. I'm
putting it in a scalar. (I don't use the global versions).
DB: Row::FETCH -keyword = <*DBIx::Recordset::newself>
[19027]ERR: 24: Error in Perl code: Can't upgrade that kind of
scalar at /usr/local/www/purem/index.html line 36.
Here it is in detail. Any ideas?
DB: Row::FETCH -keyword = Setup New Recordset for table
keywordmap,keyword, article_id = 62
DB: Use already open dbh for DBI:mysql:PureMessaging;host=localhost
(id=3, numOpen = 0)
DB: TAB = keywordmap, COL = 0, NAME = article_id, TYPE = 4 -> numeric
DB: TAB = keywordmap, COL = 1, NAME = keyword_id, TYPE = 4 -> numeric
DB: TAB = keyword, COL = 0, NAME = id, TYPE = 4 -> numeric
DB: TAB = keyword, COL = 1, NAME = type, TYPE = 12
DB: TAB = keyword, COL = 2, NAME = keyword, TYPE = 12
DB: TAB = keywordmap, COL = 0, NAME = article_id, TYPE = 4 -> numeric
DB: TAB = keywordmap, COL = 1, NAME = keyword_id, TYPE = 4 -> numeric
DB: TAB = keyword, COL = 0, NAME = id, TYPE = 4 -> numeric
DB: TAB = keyword, COL = 1, NAME = type, TYPE = 12
DB: TAB = keyword, COL = 2, NAME = keyword, TYPE = 12
DB: New Recordset driver=mysql placeholders supported
DB: Setup: !Debug = 9
DB: Setup: !Fields = <undef>
DB: Setup: !TabRelation = <undef>
DB: Setup: !TabJoin = keywordmap LEFT JOIN keyword on (keyword_id=id)
DB: Setup: !PrimKey = <undef>
DB: Setup: !Serial = <undef>
DB: Setup: !Sequence = <undef>
DB: Setup: !SeqClass = <undef>
DB: Setup: !StoreAll = <undef>
DB: Setup: !Default = HASH(0x2d4e3e4)
DB: Setup: !IgnoreEmpty = 0
DB: Setup: !WriteMode = 7
DB: Setup: !TieRow = 1
DB: Setup: !LongNames = 0
DB: Setup: !LinkName = 0
DB: Setup: !NameField = <undef>
DB: Setup: !Order = keyword
DB: Setup: !TableFilter = <undef>
DB: Setup: !DoOnConnect = <undef>
DB: SelectWhere <!Default>=<HASH(0x2d4e3e4)> type = !
DB: SelectWhere <!LinkedField>=<article_id> type = !
DB: SelectWhere <!Order>=<keyword> type = !
DB: SelectWhere <!MainField>=<id> type = !
DB: SelectWhere <!Filter>=<<undef>> type = !
DB: SelectWhere <!DataSource>=<DBIx::Recordset=HASH(0xbd2a40)> type = !
DB: SelectWhere <article_id>=<62> type = a
DB: Single Field article_id
DB: Single Field gives article_id = ?
DB: Key article_id gives (article_id = ?) bind_values = <62> bind_types=<4>
DB: expr is ( (article_id = ?))
DB: SelectWhere <!Table>=<keywordmap,keyword> type = !
DB: SelectWhere <!TabJoin>=<keywordmap LEFT JOIN keyword on
(keyword_id=id)> type = !
DB: FLUSH Recordset id = 3 DBIx::Recordset=HASH(0xbdeb74)
DB: 'SELECT * FROM keywordmap LEFT JOIN keyword on (keyword_id=id)
WHERE ( (article_id = ?)) ORDER BY keyword ' bind_values=<62>
bind_types=<4>
DB: Row::FETCH -keyword = <*DBIx::Recordset::newself>
[19027]ERR: 24: Error in Perl code: Can't upgrade that kind of
scalar at /usr/local/www/purem/index.html line 36.
describe keywordmap;
+------------+------------------+------+-----+---------+-------+
| Field | Type | Null | Key | Default | Extra |
+------------+------------------+------+-----+---------+-------+
| article_id | int(10) unsigned | | PRI | 0 | |
| keyword_id | int(10) unsigned | | PRI | 0 | |
+------------+------------------+------+-----+---------+-------+
2 rows in set (0.01 sec)
mysql> describe keyword;
+---------+------------------+------+-----+---------+----------------+
| Field | Type | Null | Key | Default | Extra |
+---------+------------------+------+-----+---------+----------------+
| id | int(10) unsigned | | PRI | NULL | auto_increment |
| type | varchar(32) | YES | MUL | | |
| keyword | varchar(64) | | | | |
+---------+------------------+------+-----+---------+----------------+
3 rows in set (0.00 sec)
DB: SelectWhere <article_id>=<<undef>> type = a
DB: Single Field article_id
DB: Single Field gives article_id IS NULL
DB: Key article_id gives (article_id IS NULL) bind_values = <> bind_types=<>
DB: expr is ( (article_id IS NULL))
DB: FLUSH Recordset id = 3 DBIx::Recordset=HASH(0xbd6cc4)
DB: 'SELECT * FROM keywordmap LEFT JOIN keyword on (keyword_id=id)
WHERE ( (article_id IS NULL)) ORDER BY keyword ' bind_values=<>
bind_types=<>
DB: Row::FETCH -keyword = <*DBIx::Recordset::newself>
[18939]ERR: 24: Error in Perl code: Can't upgrade that kind of
scalar at /usr/local/www/purem/index.html line 36.
--
Kee Hinckley
http://www.messagefire.com/ Next Generation Spam Defense
http://commons.somewhere.com/buzz/ Writings on Technology and Society
I'm not sure which upsets me more: that people are so unwilling to accept
responsibility for their own actions, or that they are so eager to regulate
everyone else's.
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org
Re: DBIx::Recordset struggles to pass tests
Posted by Jeff Zucker <je...@vpservices.com>.
Terrence Brannon wrote:
> . There's no free version of Oracle for Windows is there? I run Cygwin.
Actually there is a free version for personal use on windows:
http://otn.oracle.com/software/products/8i_personal/index.html
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org
Re: DBIx::Recordset struggles to pass tests
Posted by Terrence Brannon <me...@urth.org>.
Michael Gray wrote:
>>source databases available, or I would do some testing and patching
>>myself. There's no free version of Oracle for Windows is there? I run
>>Cygwin.
>>
>>
> Hmm, I wonder what could be causing this to happen. I have only open
>
>
>Jeff's pointed out the free version.
>
This morning, 11 hours ago I started installing the Windows version of
Oracle and it is stuck, saying
"Tool Name: Oracle Database Configuration Assistant: In Progress".
By now I am fairly certain the install is not going to happe
> Meanwhile, I'm happy to do some
>delving if anyone's prepared to suggest what I should be looking for, or
>else I can pass on detailed logs, etc.
>
>
>
Most Recordset bugs are pretty easy to fix if you just dig into the
source and the test suite, but without having a running Oracle, I am
useless.
Re: DBIx::Recordset struggles to pass tests
Posted by Michael Gray <mj...@eng.cam.ac.uk>.
On Tue, 11 Nov 2003, Terrence Brannon wrote:
> Michael Gray wrote:
>
> >Hs anyone had any luck getting DBIx::Recordset to pass its tests using
> >recent versions of perl, DBI and DBD::Oracle?
> >
> Angus Lees and myself have several patches for Recordset, most are
> archived in the embperl mailing list.
Many thanks for the pointer.
I've tried Angus' debian patches, but they don't change the results in
these two cases. Are there others which might help?
> Hmm, I wonder what could be causing this to happen. I have only open
> source databases available, or I would do some testing and patching
> myself. There's no free version of Oracle for Windows is there? I run
> Cygwin.
Jeff's pointed out the free version. Meanwhile, I'm happy to do some
delving if anyone's prepared to suggest what I should be looking for, or
else I can pass on detailed logs, etc.
--
Michael
---------------------------------------------------------------------
To unsubscribe, e-mail: embperl-unsubscribe@perl.apache.org
For additional commands, e-mail: embperl-help@perl.apache.org