Received: from punt2.demon.co.uk by oink with SMTP (PP) id <02436-3@oink>; Tue, 13 Feb 1996 14:28:28 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824218313:13457:0; Tue, 13 Feb 96 13:31:53 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa12667; 13 Feb 96 13:30 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id EAA29684 for dbi-users-real; Tue, 13 Feb 1996 04:06:32 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from netserve.lasc.lockheed.com (netserve.lasc.lockheed.com [134.5.45.1]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id EAA29680 for ; Tue, 13 Feb 1996 04:06:30 -0800 Message-Id: <199602131206.EAA29680@toccata.fugue.com> Received: from mip.lasc.lockheed.com by netserve.lasc.lockheed.com with SMTP (1.37.109.4/16.2) id AA21605; Tue, 13 Feb 96 07:06:43 -0500 Received: by mip.lasc.lockheed.com (1.38.193.4/16.2) id AA24836; Tue, 13 Feb 1996 07:08:24 -0500 Date: Tue, 13 Feb 1996 07:08:24 -0500 From: Terry Greenlaw To: dbi-users@fugue.com Subject: Re: DBI-Oracle & SQL*Net > From owner-dbi-users@fugue.com Tue Feb 13 06:28 EST 1996 > Received: from marble.litc.lockheed.com by mip.lasc.lockheed.com with SMTP > (1.38.193.4/16.2) id AA24331; Tue, 13 Feb 1996 06:28:32 -0500 > Return-Path: > Received: from toccata.fugue.com (toccata.fugue.com [204.254.239.2]) by marble.litc.lockheed.com (8.6.12/8.6.9) with ESMTP id DAA13286; Tue, 13 Feb 1996 03:32:40 -0800 > Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id CAA29603 for dbi-users-real; Tue, 13 Feb 1996 02:27:40 -0800 > Precedence: junk > Sender: owner-perldb-interest@fugue.com > Received: from scylla.sovam.com (scylla.sovam.com [194.67.2.97]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id CAA29599 for ; Tue, 13 Feb 1996 02:27:32 -0800 > Received: from pb.frb.ru by scylla.sovam.com with SMTP id AA00989 > (5.67b8s3p1/IDA-1.5); Tue, 13 Feb 1996 13:23:33 +0300 > Received: from bruchmula.pb.frb.ru by pb.frb.ru with SMTP id AA02127 > (5.65.kiae-1 ); Tue, 13 Feb 1996 13:57:23 +0300 > Date: Tue, 13 Feb 1996 13:57:23 +0300 > Message-Id: <199602131057.AA02127@pb.frb.ru> > X-Sender: romas@pb.frb.ru > X-Mailer: Windows Eudora Light Version 1.5.2 > Mime-Version: 1.0 > Content-Type: text/plain; charset="us-ascii" > To: dbi-users@fugue.com > From: "Roman L. Podshivalov" > Subject: DBI-Oracle & SQL*Net > Cc: Tim.Bunce@ig.co.uk > Status: R > Third try... > Does Any1 using successfully DBI-ORACLE & SQL*Net .... pls let me know. > I cannot do this ... > I'm using SunOS 5.4 Generic_101945-13 , Oralce 7.2.2.4 , DBI-065, > DBD-Oracle-0.27, perl 5.001m > SQL*Net v1 &v2 seems to be configured properly: > sqlplus scott/tiger@TEST-HERA - OK > tnsnames.ora > TEST-HERA= > (DESCRIPTION= > (ADDRESS= > (PROTOCOL=TCP)(HOST=hera)(PORT=1521) > ) > (CONNECT_DATA= > (SID=XXX) > ) > ) > also have slinks to $ORACLE_HOME/network/admin & $HOME > sqlplus scott/tiger@T:hera:XXX - OK > Problems: > ------------------------------------------------------- > 1. export TNS_ADMIN=/var/opt/oracle || export > TNS_ADMIN=/var/opt/oracle/tnsnames.ora > ora_login('TEST-HERA', 'scott', 'tiger') - ORA-12545: > TNS:name lookup failure > 2. ora_login('', 'scott@TEST-HERA', 'tiger') - ORA-12203: > TNS:unable to connect to destination > 3. export TWO_TASK=TEST-HERA; > ora_login('', 'scott', 'tiger') - ORA-12203: TNS:unable to > connect to destination > 4. export ORACLE_SID=TEST-HERA; > ora_login('', 'scott', 'tiger') - ORA-12203: TNS:unable to > connect to destination > 5. ora_login('T:hera:XXX', 'scott', 'tiger') - ORA-06401: NETCMN: > invalid driver designator > 6. ora_login('', 'scott@T:hera:XXX', 'tiger') - ORA-06401: NETCMN: > invalid driver designator > > Pls any suggestion ? > Rock&Roll forever > Romas BEGIN { $ENV{TWO_TASK}='PROD' } ora_login('','scott/tiger'); works here for SQL*Net 2.x, as does BEGIN { $ENV{TWO_TASK}='T:rt1:PROD'; } for SQL*Net 1.x connections. The only Oracle-related environment variable we set is TWO_TASK. For local connections use 'P:PROD'. tog Terry Greenlaw (on-site @ Lockheed Martin) Encompass Technologies z50816@mip.mar.lmco.com terry@encompass.is.net ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <02436-8@oink>; Tue, 13 Feb 1996 14:29:02 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824219604:22864:0; Tue, 13 Feb 96 13:53:24 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa22502; 13 Feb 96 13:52 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id EAA29728 for dbi-users-real; Tue, 13 Feb 1996 04:54:25 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-4.mail.demon.net (relay-4.mail.demon.net [158.152.1.108]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id EAA29724 for ; Tue, 13 Feb 1996 04:53:36 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-4.mail.demon.net id ac29609; 13 Feb 96 12:07 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ac23436; 13 Feb 96 12:03 GMT Received: from toad by oink with SMTP (PP) id <15067-0@oink>; Tue, 13 Feb 1996 10:25:52 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA21087; Tue, 13 Feb 1996 10:25:45 +0000 Date: Tue, 13 Feb 1996 10:25:45 +0000 From: Tim Bunce Message-Id: <9602131025.AA21087@toad.ig.co.uk> To: dbi-users@fugue.com, rantapaa@math.umn.edu Subject: Re: How big is your Oracle.so? X-Sun-Charset: US-ASCII content-length: 224 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: "Erik E. Rantapaa" > > My Oracle.so is huge -- 1807620 bytes to be exact. > Is there a way I can make it any smaller? Upgrade to Oracle 7.2 (or maybe 7.3) which has a shared library. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <02437-11@oink>; Tue, 13 Feb 1996 14:29:15 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824219461:17743:1; Tue, 13 Feb 96 13:51:01 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa17656; 13 Feb 96 13:50 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa07489; 13 Feb 96 13:49 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id EAA29709 for dbi-users-real; Tue, 13 Feb 1996 04:27:33 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-4.mail.demon.net (relay-4.mail.demon.net [158.152.1.108]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id EAA29705 for ; Tue, 13 Feb 1996 04:27:28 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-4.mail.demon.net id ai29437; 13 Feb 96 12:06 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ai23436; 13 Feb 96 12:03 GMT Received: from toad by oink with SMTP (PP) id <01159-0@oink>; Tue, 13 Feb 1996 11:30:25 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA21583; Tue, 13 Feb 1996 11:30:19 +0000 Date: Tue, 13 Feb 1996 11:30:19 +0000 From: Tim Bunce Message-Id: <9602131130.AA21583@toad.ig.co.uk> To: dbi-users@fugue.com, romas@pb.frb.ru Subject: Re: DBI-Oracle & SQL*Net X-Sun-Charset: US-ASCII content-length: 2130 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: "Roman L. Podshivalov" > > Third try... > > Does Any1 using successfully DBI-ORACLE & SQL*Net .... pls let me know. > I cannot do this ... > I'm using SunOS 5.4 Generic_101945-13 , Oralce 7.2.2.4 , DBI-065, > DBD-Oracle-0.27, perl 5.001m > > SQL*Net v1 &v2 seems to be configured properly: > > sqlplus scott/tiger@TEST-HERA - OK > tnsnames.ora > TEST-HERA= > (DESCRIPTION= > (ADDRESS= > (PROTOCOL=TCP)(HOST=hera)(PORT=1521) > ) > (CONNECT_DATA= > (SID=XXX) > ) > ) > also have slinks to $ORACLE_HOME/network/admin & $HOME > > sqlplus scott/tiger@T:hera:XXX - OK > > Problems: > ------------------------------------------------------- > 1. export TNS_ADMIN=/var/opt/oracle || export > TNS_ADMIN=/var/opt/oracle/tnsnames.ora > ora_login('TEST-HERA', 'scott', 'tiger') - ORA-12545: > TNS:name lookup failure > 2. ora_login('', 'scott@TEST-HERA', 'tiger') - ORA-12203: > TNS:unable to connect to destination > 3. export TWO_TASK=TEST-HERA; > ora_login('', 'scott', 'tiger') - ORA-12203: TNS:unable to > connect to destination > 4. export ORACLE_SID=TEST-HERA; > ora_login('', 'scott', 'tiger') - ORA-12203: TNS:unable to > connect to destination > 5. ora_login('T:hera:XXX', 'scott', 'tiger') - ORA-06401: NETCMN: > invalid driver designator > 6. ora_login('', 'scott@T:hera:XXX', 'tiger') - ORA-06401: NETCMN: > invalid driver designator > > Pls any suggestion ? Try leaving user and password parameters empty. Oracle will then use the environment variables in the same way that sqlplus does. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <03091-0@oink>; Tue, 13 Feb 1996 15:09:44 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824223410:16985:0; Tue, 13 Feb 96 14:56:50 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa16860; 13 Feb 96 14:56 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa15840; 13 Feb 96 14:54 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id FAA29790 for dbi-users-real; Tue, 13 Feb 1996 05:36:37 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from fruitbat.mcqueen.com (pillshovel.mcqueen.com [194.72.106.246]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id FAA29786 for ; Tue, 13 Feb 1996 05:36:35 -0800 Received: (from descarte@localhost) by fruitbat.mcqueen.com (8.6.12/8.6.12) id NAA10625; Tue, 13 Feb 1996 13:30:50 GMT From: Alligator Descartes Message-Id: <199602131330.NAA10625@fruitbat.mcqueen.com> Subject: Re: DBI-Oracle & SQL*Net To: "Roman L. Podshivalov" Date: Tue, 13 Feb 1996 13:30:50 +0000 (GMT) Cc: dbi-users@fugue.com, Tim.Bunce@ig.co.uk In-Reply-To: <199602131057.AA02127@pb.frb.ru> from "Roman L. Podshivalov" at Feb 13, 96 01:57:23 pm X-Pants: ** The return address of this email should be: descarte@hermetica.com X-Mailer: ELM [version 2.4 PL24] MIME-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 696 > Does Any1 using successfully DBI-ORACLE & SQL*Net .... pls let me know. > I cannot do this ... Yes. > I'm using SunOS 5.4 Generic_101945-13 , Oralce 7.2.2.4 , DBI-065, > DBD-Oracle-0.27, perl 5.001m > > SQL*Net v1 &v2 seems to be configured properly: Try checking your SQL*Net logs on the remote host. It could just be botching the connect. I don't know why, but look there and see what you can find. If there's nothing apprearing when those connections should be connecting, it's definitely a client-side issue. > Romas -- Alligator Descartes | "...Nil posse creari De nilo" descarte@hermetica.com | -- Lucretius, De Rerum Natura I, l.155 http://www.hermetica.com/descarte | ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <03504-2@oink>; Tue, 13 Feb 1996 17:02:36 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824230008:10547:0; Tue, 13 Feb 96 16:46:48 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa09681; 13 Feb 96 16:45 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA29991 for dbi-users-real; Tue, 13 Feb 1996 07:33:41 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-4.mail.demon.net (relay-4.mail.demon.net [158.152.1.108]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id HAA29987 for ; Tue, 13 Feb 1996 07:33:33 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-4.mail.demon.net id ab20166; 13 Feb 96 15:16 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ab21720; 13 Feb 96 15:09 GMT Received: from toad by oink with SMTP (PP) id <03047-0@oink>; Tue, 13 Feb 1996 14:57:05 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA22694; Tue, 13 Feb 1996 14:56:56 +0000 Date: Tue, 13 Feb 1996 14:56:56 +0000 From: Tim Bunce Message-Id: <9602131456.AA22694@toad.ig.co.uk> To: romas@pb.frb.ru Subject: Re: DBI-Oracle & SQL*Net Cc: dbi-users@fugue.com X-Sun-Charset: US-ASCII content-length: 399 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: "Roman L. Podshivalov" > > >Try leaving user and password parameters empty. Oracle will then use > >the environment variables in the same way that sqlplus does. > > Maybe I'm a stupid man but usual sqlplus asks for username & passwd. > How it can be done from perl ? No, I'm the stupid one. I meant leave the dbname empty and let Oracle use the env vars. Sorry. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <03774-1@oink>; Tue, 13 Feb 1996 17:07:04 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824231101:15845:0; Tue, 13 Feb 96 17:05:01 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa15621; 13 Feb 96 17:04 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id ab00970; 13 Feb 96 17:02 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id FAA29767 for dbi-users-real; Tue, 13 Feb 1996 05:14:21 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from colossus.cse.psu.edu (root@colossus.cse.psu.edu [130.203.1.2]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id FAA29763 for ; Tue, 13 Feb 1996 05:14:20 -0800 Received: from localhost by colossus.cse.psu.edu with SMTP id <78376>; Tue, 13 Feb 1996 08:16:32 -0500 X-Mailer: exmh version 1.6.1 5/23/95 To: "Roman L. Podshivalov" cc: dbi-users@fugue.com Subject: Re: DBI-Oracle & SQL*Net In-reply-to: Your message of "Tue, 13 Feb 1996 05:57:23 EST." <199602131057.AA02127@pb.frb.ru> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Tue, 13 Feb 1996 08:15:47 -0500 From: John D Groenveld Message-Id: <96Feb13.081632est.78376@colossus.cse.psu.edu> Just a wild guess, but perhaps ora_login doesnt like "-" in your sqlnet alias. Try it with an alias without the dash, otherwise I can see any obvious problems. I'll try to duplicate your error later. John groenvel@cse.psu.edu ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <09064-2@oink>; Wed, 14 Feb 1996 11:08:10 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824288472:15746:0; Wed, 14 Feb 96 09:01:12 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa15404; 14 Feb 96 9:00 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id WAA02249 for dbi-users-real; Tue, 13 Feb 1996 22:17:36 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-4.mail.demon.net (relay-4.mail.demon.net [158.152.1.108]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id WAA02245 for ; Tue, 13 Feb 1996 22:17:29 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-4.mail.demon.net id av24593; 13 Feb 96 20:19 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa02775; 13 Feb 96 20:11 GMT Received: from toad by oink with SMTP (PP) id <05049-0@oink>; Tue, 13 Feb 1996 20:11:00 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA23381; Tue, 13 Feb 1996 20:10:54 +0000 Date: Tue, 13 Feb 1996 20:10:54 +0000 From: Tim Bunce Message-Id: <9602132010.AA23381@toad.ig.co.uk> To: romas@online.ru Subject: Re: DBD with SQL*Net Cc: dbi-users@fugue.com X-Sun-Charset: US-ASCII content-length: 1082 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 Forwarded to the dbi-users list. ----- Begin Included Message ----- From: Roman Podshivalov > > > Here's your problem.....I don't have an Oracle error manual to hand, so > > > I don't know exactly what causes this one, although, I can tell you > > > I've never seen it before! 'oerr' doesn't report much useful data other > > > than something's wrong with your connection descriptor and you need to > > > fix it! > > > > I thing some problem in hash function with tag XXX - its my SID, trying > > to change... Will inform you if interest... > > Yes, please keep me informed as to what's happening........This is a most > odd thing to see happening! > Nope I've changed XXX->ROL all error still exist ;-( be: ROL - sql*net v2 alias for T:hera:ROL sqlplus scott/tiger@ROL - OK sqlplus scott/tiger@T:hera:ROL - OK but from perl ora_login doesnot work at all in all combination when use alias v1 - ORA-06401: invalid driver designator when v2 - ORA-12203: unable to connect to destination... Any new suggestion ? ----- End Included Message ----- ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <14568-14@oink>; Thu, 15 Feb 1996 07:08:12 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824340692:15230:1; Wed, 14 Feb 96 23:31:32 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa15202; 14 Feb 96 23:31 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa21287; 14 Feb 96 23:31 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id MAA00516 for dbi-dev-real; Wed, 14 Feb 1996 12:12:47 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from gw.home.vix.com (gw.home.vix.com [192.5.5.1]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id MAA00512 for ; Wed, 14 Feb 1996 12:12:46 -0800 Received: by gw.home.vix.com id MAA16472; Wed, 14 Feb 1996 12:02:37 -0800 (PST) X-btw: vix.com is also gw.home.vix.com and vixie.sf.ca.us Received: from post.demon.co.uk ([158.152.1.72]) by relay-4.mail.demon.net id ag17201; 13 Feb 96 23:42 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa07592; 13 Feb 96 23:34 GMT Received: from toad by oink with SMTP (PP) id <05989-0@oink>; Tue, 13 Feb 1996 23:33:39 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA23737; Tue, 13 Feb 1996 23:33:24 +0000 Date: Tue, 13 Feb 1996 23:33:24 +0000 From: Tim Bunce Message-Id: <9602132333.AA23737@toad.ig.co.uk> To: dbi-dev@fugue.com Subject: Use of the dbi-dev mailing list Cc: kejin@lithium.empress.com, bjepson@conan.ids.net X-Sun-Charset: US-ASCII Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 Would anyone object if this list (dbi-DEV) is used to discuss the development of free ODBC drivers? Given the stated direction of the DBI (yes, yes, I know, it'll happen, sheesh :) I think it would be complementary to ODBC based DBI development. Tim. p.s. All will become clear shortly. Don't ask why :-) ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <14568-19@oink>; Thu, 15 Feb 1996 07:09:02 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824345716:20467:0; Thu, 15 Feb 96 00:55:16 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa20098; 15 Feb 96 0:54 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa02717; 15 Feb 96 0:51 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id MAA00487 for dbi-users-real; Wed, 14 Feb 1996 12:06:38 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from ward.nadn.navy.mil ([131.121.160.3]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id MAA00483 for ; Wed, 14 Feb 1996 12:05:57 -0800 Received: (from harle@localhost) by ward.nadn.navy.mil (8.6.12/8.6.12) id KAA03866; Wed, 14 Feb 1996 10:49:19 -0500 Date: Wed, 14 Feb 1996 10:49:18 -0500 (EST) From: Jim Harle X-Sender: harle@ward To: dbi-users@fugue.com cc: Tim.Bunce@ig.co.uk Subject: Problems building DBI 0.66 on DG/UX Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Here's the requested stuff. I had a problem building perl5.002gamma also, but got around it by making LD_LIBRARY_PATH point to the directory where I was building it. I was able to run all tests succesffully (on perl) even without setting LD_LIBRARY_PATH once it was installed. I tried expand LD_LIBRARY_PATH to include blib/arch//auto/DBI when attemptin to test DBI, but that failed. I'm thus reporting this as directed in README. Any help would be appreciated. --Jim Harle perl Makefile.PL Remember to actually *read* the README file! Build, TEST and INSTALL Perl 5 first. Use version 5.002beta2 or later. DO NOT build the DBI under the Perl source tree. Use 'make test' to execute self tests. Install DBI (using 'make install' before building DBD::* drivers. MakeMaker (v5.21) DEFINE => q[-Wall -pedantic -Wno-comment] NAME => q[DBI] VERSION_FROM => q[DBI.pm] dist => { DIST_DEFAULT=>q[clean distcheck disttest ci tardist] } DBI VERSION is 0.66 (from DBI.pm) Using PERL=/usr/local/bin/perl Writing Makefile for DBI 80 tiller> make umask 0 && cp DBIXS.h ./blib/arch//DBI/DBIXS.h umask 0 && cp lib/DBD/ExampleP.pm ./blib/lib//DBD/ExampleP.pm umask 0 && cp lib/DBD/NullP.pm ./blib/lib//DBD/NullP.pm umask 0 && cp lib/DBD/Sponge.pm ./blib/lib//DBD/Sponge.pm umask 0 && cp DBI.pm ./blib/lib//DBI.pm /usr/local/bin/perl -I/usr/local/lib/perl5/AViiON-dgux/5.002 -I/usr/local/lib/perl5 /usr/local/lib/perl5/ExtUtils/xsubpp -typemap /usr/local/lib/perl5/ExtUtils/typemap DBI.xs >DBI.tc && mv DBI.tc DBI.c gcc -c -Dflock=dg_flock -I/usr/local/include -D_NO_PROTO -O2 -DVERSION=\"0.66\" -DXS_VERSION=\"0.66\" -fpic -I/usr/local/lib/perl5/AViiON-dgux/5.002/CORE/ -Wall -pedantic -Wno-comment DBI.c /usr/include/sys/signal.h: In function `signal': In file included from /usr/include/signal.h:45, from /usr/local/lib/perl5/AViiON-dgux/5.002/CORE/unixish.h:52, from /usr/local/lib/perl5/AViiON-dgux/5.002/CORE/perl.h:561, from DBIXS.h:13, from DBI.c:19: /usr/include/sys/signal.h:1467: warning: left-hand operand of comma expression has no effect /usr/include/sys/signal.h: In function `sigaction': /usr/include/sys/signal.h:1514: warning: left-hand operand of comma expression has no effect /usr/include/sys/signal.h: In function `sigset': /usr/include/sys/signal.h:1556: warning: left-hand operand of comma expression has no effect /usr/include/sys/signal.h: In function `sigvec': /usr/include/sys/signal.h:1595: warning: left-hand operand of comma expression has no effect DBI.c: In function `dbih_setup_handle': DBI.c:338: warning: value computed is not used DBI.c:351: warning: value computed is not used DBI.c:357: warning: value computed is not used DBI.c:358: warning: value computed is not used DBI.c:359: warning: value computed is not used DBI.c:360: warning: value computed is not used DBI.c: In function `dbih_sth_bind_col': DBI.c:546: warning: value computed is not used DBI.c: In function `dbih_set_attr': DBI.c:597: warning: value computed is not used DBI.c: In function `dbih_get_attr': DBI.c:632: warning: value computed is not used DBI.c: In function `XS_DBI_dispatch': DBI.c:852: warning: value computed is not used DBI.c:852: warning: value computed is not used Running Mkbootstrap for DBI () chmod 644 DBI.bs LD_RUN_PATH="" gcc -o ./blib/arch//auto/DBI/DBI.so -shared -L/usr/local/lib DBI.o chmod 755 ./blib/arch//auto/DBI/DBI.so cp DBI.bs ./blib/arch//auto/DBI/DBI.bs chmod 644 ./blib/arch//auto/DBI/DBI.bs 81 tiller> make test PERL_DL_NONLAZY=1 /usr/local/bin/perl -I./blib/arch/ -I./blib/lib/ -I/usr/local/lib/perl5/AViiON-dgux/5.002 -I/usr/local/lib/perl5 -e 'use Test::Harness qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t/*.t t/min...............Can't load './blib/arch//auto/DBI/DBI.so' for module DBI: dynamic linker: /usr/local/bin/perl: relocation error: symbol not found: __CTOR_LIST__ at /usr/local/lib/perl5/DynaLoader.pm line 140. at blib/lib//DBI.pm line 32 FAILED tests 1-11 Failed 11/11 tests, 0.00% okay Test returned status 2 (wstat 512) Failed 1 test script, 0.00% okay. 11/11 subtests failed, 0.00% okay. *** Error code 29 Stop. 82 tiller> make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /usr/local/bin/perl -I./blib/arch/ -I./blib/lib/ -I/usr/local/lib/perl5/AViiON-dgux/5.002 -I/usr/local/lib/perl5 -e 'use Test::Harness qw(&runtests $verbose); $verbose=1; runtests @ARGV;' t/*.t t/min...............1..11 Can't load './blib/arch//auto/DBI/DBI.so' for module DBI: dynamic linker: /usr/local/bin/perl: relocation error: symbol not found: __CTOR_LIST__ at /usr/local/lib/perl5/DynaLoader.pm line 140. at blib/lib//DBI.pm line 32 FAILED tests 1-11 Failed 11/11 tests, 0.00% okay Test returned status 2 (wstat 512) Failed 1 test script, 0.00% okay. 11/11 subtests failed, 0.00% okay. *** Error code 29 Stop. 83 tiller> ls -l core UX:ls: ERROR: Cannot access core: No such file or directory 84 tiller> perl -V Summary of my perl5 (5.0 patchlevel 2) configuration: Platform: osname=dgux, osver=5.4r3.10, archname=AViiON-dgux uname='dgux tiller 5.4r3.10 generic aviion mc88110 ' hint=recommended, useposix=true Compiler: cc='gcc', optimize='-O2', gccversion=2.5.8 cppflags='-Dflock=dg_flock -I/usr/local/include -D_NO_PROTO' ccflags ='-Dflock=dg_flock -I/usr/local/include -D_NO_PROTO' stdchar='unsigned char', d_stdstdio=define, usevfork=true voidflags=15, castflags=0, d_casti32=define, d_castneg=define intsize=4, alignbytes=8, usemymalloc=y, randbits=15 Linker and Libraries: ld='gcc', ldflags =' -L/usr/local/lib' libpth=/usr/local/lib /usr/sde/m88kdguxelf/usr/lib /lib /usr/lib libs=-ldgc -lnsl -ldbm -ldl -lld -lm -lc -lposix -lcrypt -lPW libc=/lib/libc.so, so=so Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=, ccdlflags=' ' cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib' @INC: /usr/local/lib/perl5/AViiON-dgux/5.002 /usr/local/lib/perl5 /usr/local/lib/perl5/site_perl/AViiON-dgux /usr/local/lib/perl5/site_perl /usr/local/lib/perl5/AViiON-dgux . ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <20094-10@oink>; Thu, 15 Feb 1996 19:18:12 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824411696:22415:0; Thu, 15 Feb 96 19:14:56 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa18940; 15 Feb 96 19:11 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id EAA03551 for dbi-users-real; Thu, 15 Feb 1996 04:59:48 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id EAA03547 for ; Thu, 15 Feb 1996 04:59:39 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id aa10859; 15 Feb 96 11:58 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id af17512; 15 Feb 96 11:48 GMT Received: from toad by oink with SMTP (PP) id <16498-0@oink>; Thu, 15 Feb 1996 11:11:50 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA00207; Thu, 15 Feb 1996 11:11:43 +0000 Date: Thu, 15 Feb 1996 11:11:43 +0000 From: Tim Bunce Message-Id: <9602151111.AA00207@toad.ig.co.uk> To: dbi-users@fugue.com, harle@nadn.navy.mil Subject: Re: Problems building DBI 0.66 on DG/UX Cc: perl5-porters@nicoh.com X-Sun-Charset: US-ASCII content-length: 2763 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 CC'd to perl5-porters for assistance. > From: Jim Harle > > Here's the requested stuff. I had a problem building perl5.002gamma > also, but got around it by making LD_LIBRARY_PATH point to the directory > where I was building it. I was able to run all tests succesffully (on > perl) even without setting LD_LIBRARY_PATH once it was installed. I > tried expand LD_LIBRARY_PATH to include blib/arch//auto/DBI when > attemptin to test DBI, but that failed. I'm thus reporting this as > directed in README. Any help would be appreciated. --Jim Harle > > perl Makefile.PL > > gcc -c -Dflock=dg_flock -I/usr/local/include -D_NO_PROTO -O2 > -DVERSION=\"0.66\" -DXS_VERSION=\"0.66\" -fpic > -I/usr/local/lib/perl5/AViiON-dgux/5.002/CORE/ -Wall -pedantic > -Wno-comment DBI.c > LD_RUN_PATH="" gcc -o ./blib/arch//auto/DBI/DBI.so -shared -L/usr/local/lib DBI.o > 81 tiller> make test > PERL_DL_NONLAZY=1 /usr/local/bin/perl -I./blib/arch/ > -I./blib/lib/ -I/usr/local/lib/perl5/AViiON-dgux/5.002 > -I/usr/local/lib/perl5 -e 'use Test::Harness qw(&runtests $verbose); > $verbose=0; runtests @ARGV;' t/*.t > t/min...............Can't load './blib/arch//auto/DBI/DBI.so' for module > DBI: dynamic linker: /usr/local/bin/perl: relocation error: symbol not > found: __CTOR_LIST__ at /usr/local/lib/perl5/DynaLoader.pm line 140. > Summary of my perl5 (5.0 patchlevel 2) configuration: > Platform: > osname=dgux, osver=5.4r3.10, archname=AViiON-dgux > uname='dgux tiller 5.4r3.10 generic aviion mc88110 ' > hint=recommended, useposix=true > Compiler: > cc='gcc', optimize='-O2', gccversion=2.5.8 > cppflags='-Dflock=dg_flock -I/usr/local/include -D_NO_PROTO' > ccflags ='-Dflock=dg_flock -I/usr/local/include -D_NO_PROTO' > stdchar='unsigned char', d_stdstdio=define, usevfork=true > voidflags=15, castflags=0, d_casti32=define, d_castneg=define > intsize=4, alignbytes=8, usemymalloc=y, randbits=15 > Linker and Libraries: > ld='gcc', ldflags =' -L/usr/local/lib' > libpth=/usr/local/lib /usr/sde/m88kdguxelf/usr/lib /lib /usr/lib > libs=-ldgc -lnsl -ldbm -ldl -lld -lm -lc -lposix -lcrypt -lPW > libc=/lib/libc.so, so=so > Dynamic Linking: > dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=, ccdlflags=' ' > cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib' > > @INC: /usr/local/lib/perl5/AViiON-dgux/5.002 /usr/local/lib/perl5 > /usr/local/lib/perl5/site_perl/AViiON-dgux /usr/local/lib/perl5/site_perl > /usr/local/lib/perl5/AViiON-dgux . The __CTOR_LIST__ symbol looks like a gcc/ld/C++ issue but I don't know. Perhaps an upgrade to a more recent gcc (2.7.2) would help. Suggestions from perl5-porters very welcome. Tim. ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <20397-3@oink>; Thu, 15 Feb 1996 19:52:10 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824413714:04765:1; Thu, 15 Feb 96 19:48:34 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa03399; 15 Feb 96 19:46 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA04055 for dbi-dev-real; Thu, 15 Feb 1996 09:23:28 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from netmail1.austin.ibm.com (netmail1.austin.ibm.com [129.35.208.96]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id JAA04051 for ; Thu, 15 Feb 1996 09:23:26 -0800 From: mhm@austin.ibm.com Received: from dax.austin.ibm.com (dax.austin.ibm.com [129.35.86.169]) by netmail1.austin.ibm.com (8.6.12/8.6.11) with SMTP id LAA32203; Thu, 15 Feb 1996 11:26:08 -0600 Received: by dax.austin.ibm.com (AIX 4.1/UCB 5.64/4.03-client-2.6) for dbi-dev@fugue.com at austin.ibm.com; id AA23662; Thu, 15 Feb 1996 11:26:08 -0600 Message-Id: <9602151726.AA23662@dax.austin.ibm.com> X-Mailer: exmh version 1.6.2 7/18/95 To: Tim Bunce Cc: dbi-dev@fugue.com Subject: Re: Use of the dbi-dev mailing list In-Reply-To: Your message of Tue, 13 Feb 96 23:33:24 +0000. <9602132333.AA23737@toad.ig.co.uk> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Thu, 15 Feb 96 11:26:07 -0600 Tim Bunce writes: > Would anyone object if this list (dbi-DEV) is used to discuss the development > of free ODBC drivers? No objections here. Mike -------------------------------------------------------------------------- Michael H. Moran | Standard Disclaimer: The content of mhm@austin.ibm.com | this posting is independent of Commercial Performance | official IBM position. IBM Corporation, Austin, Texas | ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <21820-0@oink>; Thu, 15 Feb 1996 23:03:58 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824425345:28129:0; Thu, 15 Feb 96 23:02:25 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa28002; 15 Feb 96 23:02 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa06251; 15 Feb 96 23:00 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id IAA03861 for dbi-users-real; Thu, 15 Feb 1996 08:46:20 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from deimos (deimos.sovam.com [194.67.1.156]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id IAA03857 for ; Thu, 15 Feb 1996 08:46:03 -0800 Received: from orpheus ([194.67.3.221]) by deimos.sovam.com with ESMTP id <260583-228>; Thu, 15 Feb 1996 19:48:28 +0300 Date: Thu, 15 Feb 1996 19:48:55 +0300 (MSK) From: Roman Podshivalov Reply-To: Roman Podshivalov Subject: ora_login trough SQL*Net failed ?! To: dbi-users@fugue.com cc: Tim.Bunce@ig.co.uk Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; LANGUAGE=russian Here there are details as requested in README: 1.----------------------- root@chronos /users/src/DBperl/DBD-Oracle-0.27 # perl Makefile.PL Configuring DBD::Oracle version 0.27... Remember to actually read the README file! Using Oracle in /usr/oracle Oracle sysliblist: -lsocket -lnsl -lm -ldl -laio -lposix4 Using /usr/oracle/proc/lib/proc.mk version 1.6 System: perl5.001 sunos chronos 5.4 generic_101945-13 sun4m sparc sun4-solaris dl_dlopen.xs Compiler: cc -O Oracle proc.mk would have used these values but we override them: CC: ld -dy $(COMPOBJS) $(LDSTRING) LDFLAGS: -L$(LIBHOME) LDSTRING: -R /opt/SUNWcluster/lib -Y P,$(LD_LIBRARY_PATH):/opt/SUNWcluster/lib:/usr/ccs/lib:/usr/lib -Qy -lc $(COMPOBJ)/crtn.o See README notes about SPARCompiler on Solaris Checking if your kit is complete... Looks good Writing Makefile for DBD::Oracle 2. -------------------------------------------- root@chronos /users/src/DBperl/DBD-Oracle-0.27 # make mkdir ./blib mkdir ./blib/DBD mkdir ./blib/auto mkdir ./blib/auto/DBD mkdir ./blib/auto/DBD/Oracle /usr/local/bin/perl -I/usr/local/lib/perl5/sun4-solaris -I/usr/local/lib/perl5 /usr/local/lib/perl5/ExtUtils/xsubpp -typemap /usr/local/lib/perl5/ExtUtils/typemap Oracle.xs >Oracle.tc && mv Oracle.tc Oracle.c cc -c -O -Kpic -I/usr/local/lib/perl5/sun4-solaris/CORE -I/usr/oracle/rdbms/demo -I/usr/local/lib/perl5/sun4-solaris/DBI Oracle.c cc -c -O -Kpic -I/usr/local/lib/perl5/sun4-solaris/CORE -I/usr/oracle/rdbms/demo -I/usr/local/lib/perl5/sun4-solaris/DBI dbdimp.c Running Mkbootstrap for DBD::Oracle () chmod 644 Oracle.bs LD_RUN_PATH="" cc -o blib/auto/DBD/Oracle/Oracle.so -G Oracle.o dbdimp.o -L/usr/oracle/lib /usr/oracle/lib/__fstd.o -locic /usr/oracle/lib/osntab.o -lsqlnet -lora -lsqlnet -lora -lnlsrtl3 -lc3v6 -lcore3 -lnlsrtl3 -lcore3 `cat /usr/oracle/rdbms/lib/sysliblist` -lsocket -lnsl -lm -ldl -laio -lposix4 chmod 755 blib/auto/DBD/Oracle/Oracle.so cp Oracle.bs ./blib/auto/DBD/Oracle/Oracle.bs chmod 644 blib/auto/DBD/Oracle/Oracle.bs cp Oraperl.pm blib/Oraperl.pm chmod 644 blib/Oraperl.pm cp oraperl.ph blib/oraperl.ph chmod 644 blib/oraperl.ph cp Oracle.pm blib/DBD/Oracle.pm chmod 644 blib/DBD/Oracle.pm 3.---------------------------------- romas@hera /src/DBperl/DBD-Oracle-0.27 $ make test /usr/local/bin/perl -I./blib -I./blib -I/usr/local/lib/perl5/sun4-solaris -I/usr/local/lib/perl5 -e 'use Test::Harness qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t/*.t t/base..............ok t/main..............ok All tests successful. Files=2, Tests=6, 2 secs ( 1.06 cusr 0.35 csys = 1.41 cpu) /usr/local/bin/perl -I./blib -I./blib -I/usr/local/lib/perl5/sun4-solaris -I/usr/local/lib/perl5 test.pl Oraperl test application $Revision: 1.19 $ Oraperl Emulation Interface version 1.23 Oracle Driver 1.21 DBI Switch by Tim Bunce, version 1.48 Connecting to '' (from command line, else uses ORACLE_SID/TWO_TASK) as 'scott/tiger' (via ORACLE_USERID environment var or default) Fields: 4 Names: 'NUM_T', 'DATE_T', 'CHAR_T', 'NULL_T' Lengths: '40', '75', '30', '0' Types: '2', '12', '1', '1' Data rows: fetch: 79.2 15-FEB-96 SCOTT NULL csr reassigned (forces destruction)... Fetch list of tables: Fetched: DUAL Fetched: SYSTEM_PRIVILEGE_MAP Fetched: TABLE_PRIVILEGE_MAP Fetched: STMT_AUDIT_OPTION_MAP Test ora_do with harmless non-select statement (set transaction read only) Expect error message: ora_do: 1453: ORA-01453: SET TRANSACTION must be first statement of transaction (DBD: oexec error) csr out of scope... ora_logoff... lda out of scope... Testing repetitive connect/open/close/disconnect: Expect sequence of digits, no other messages: 1 2 3 4 5 Test interaction of explicit close/logoff and implicit DESTROYs Expect just 'done.', no other messages: done. Test complete (4 seconds). 4.----------------------- root@chronos /users/src/DBperl/DBD-Oracle-0.27 # perl -v This is perl, version 5.001 Unofficial patchlevel 1m. Copyright 1987-1994, Larry Wall 5.------------------------- Oracle7 Server Release 7.2.2.4.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.2.2.3.0 - Production 6.-------------------------- root@chronos /users/src/DBperl/DBD-Oracle-0.27 # perl -e 'use Config; print Config::myconfig()' Summary of my perl5 (patchlevel 1) configuration: Platform: osname=solaris, osver=2.4, archname=sun4-solaris uname='sunos chronos 5.4 generic_101945-13 sun4m sparc ' hint=previous Compiler: cc='cc', optimize='-O' cppflags='' ccflags ='' ldflags ='' stdchar='unsigned char', d_stdstdio=define, usevfork=false voidflags=15, castflags=0, d_casti32=define, d_castneg=define intsize=4, alignbytes=8, usemymalloc=y, randbits=15 Libraries: so=so libpth=/lib /usr/lib /usr/ccs/lib /usr/local/lib libs=-lsocket -lnsl -ldl -lm -lc -lcrypt libc=/usr/lib/libc.so Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun= cccdlflags='-Kpic', ccdlflags=' ', lddlflags='-G' PROBLEM: sqlplus scott/tiger@V1_ALIAS - works well sqlplus scott/tiger@V2_ALIAS - works well ora_login('V1_ALIAS', 'scott/tiger', '') - ORA-06401: NETCMN: invalid driver designator ora_login('V2_ALIAS', 'scott/tiger', '') - ORA-12203: TNS:unable to connect to destination ORACLE_SID, ORACLE_HOME, TWO_TASK - seems ok (checked in all combination) BTW: Alligator Descartes can connect from his oraperl to my Oracle with scott/tiger@V1_ALIAS without any problems, but i cannot. What did i wrong ? PLS ANY SUGGESTION ? ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <22392-4@oink>; Fri, 16 Feb 1996 01:56:48 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824435742:11452:1; Fri, 16 Feb 96 01:55:42 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa10289; 16 Feb 96 1:54 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id NAA04975 for dbi-users-real; Thu, 15 Feb 1996 13:53:55 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from feanor.towson.edu (feanor.towson.edu [204.62.32.157]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id NAA04971 for ; Thu, 15 Feb 1996 13:53:52 -0800 Received: (from doug@localhost) by feanor.towson.edu (8.7.3/8.7.3) id QAA02260; Thu, 15 Feb 1996 16:55:38 -0500 (EST) Date: Thu, 15 Feb 1996 16:55:38 -0500 (EST) Message-Id: <199602152155.QAA02260@feanor.towson.edu> From: Doug McNaught To: dbi-users@fugue.com CC: Tim.Bunce@ig.co.uk Subject: DBI test failure on Unixware 1.1.2, Perl 5.002gamma My quest to implement a Perl Oracle interface on Unixware continues. After getting 5.002gamma to compile and test successfully (thanks in large part to Andy Dougherty) I attempted to get the DBI module built. It compiles OK but fails the tests: ------------------------------------------------------------ Script started on Thu Feb 15 16:19:50 1996 # unset LD_LIBRARY_PATH # perl Makefile.PL Remember to actually *read* the README file! Build, TEST and INSTALL Perl 5 first. Use version 5.002beta2 or later. DO NOT build the DBI under the Perl source tree. Use 'make test' to execute self tests. Install DBI (using 'make install' before building DBD::* drivers. MakeMaker (v5.21) Checking if your kit is complete... Looks good NAME => q[DBI] VERSION_FROM => q[DBI.pm] dist => { DIST_DEFAULT=>q[clean distcheck disttest ci tardist] } DBI VERSION is 0.66 (from DBI.pm) Using PERL=/opt/bin/perl Writing Makefile for DBI # make umask 0 && cp DBIXS.h ./blib/arch//DBI/DBIXS.h umask 0 && cp lib/DBD/ExampleP.pm ./blib/lib//DBD/ExampleP.pm umask 0 && cp lib/DBD/NullP.pm ./blib/lib//DBD/NullP.pm umask 0 && cp lib/DBD/Sponge.pm ./blib/lib//DBD/Sponge.pm umask 0 && cp DBI.pm ./blib/lib//DBI.pm /opt/bin/perl -I/opt/lib/perl5/i386-svr4.2/5.002 -I/opt/lib/perl5 /opt/lib/perl5/ExtUtils/xsubpp -typemap /opt/lib/perl5/ExtUtils/typemap DBI.xs >DBI.tc && mv DBI.tc DBI.c /bin/cc -c -I/usr/include -I/usr/ucbinclude -O -DVERSION=\"0.66\" -DXS_VERSION=\"0.66\" -Kpic -I/opt/lib/perl5/i386-svr4.2/5.002/CORE/ DBI.c UX:acomp: WARNING: "DBI.c", line 1269: warning: end-of-loop code not reached UX:acomp: WARNING: "DBI.c", line 1283: warning: end-of-loop code not reached UX:acomp: WARNING: "DBI.c", line 1327: warning: end-of-loop code not reached Running Mkbootstrap for DBI () chmod 644 DBI.bs LD_RUN_PATH="" /bin/cc -o ./blib/arch//auto/DBI/DBI.so -G -L/usr/ccs/lib -L/usr/ucblib -L/usr/local/lib DBI.o chmod 755 ./blib/arch//auto/DBI/DBI.so cp DBI.bs ./blib/arch//auto/DBI/DBI.bs chmod 644 ./blib/arch//auto/DBI/DBI.bs # make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /opt/bin/perl -I./blib/arch/ -I./blib/lib/ -I/opt/lib/perl5/i386-svr4.2/5.002 -I/opt/lib/perl5 -e 'use Test::Harness qw(&runtests $verbose); $verbose=1; runtests @ARGV;' t/*.t t/min...............1..11 ok 1 ok 2 ok 3 ok 4 ok 4 Aborting test: output counter mismatch [test 4 answered when test 5 expected] FAILED tests 5-11 Failed 7/11 tests, 36.36% okay Failed 1 test script, 0.00% okay. 6/11 subtests failed, 45.45% okay. *** Error code 2 (bu21) make: fatal error. # exit ------------------------------------------------------------ Here's the output of perl -V: Summary of my perl5 (5.0 patchlevel 2) configuration: Platform: osname=svr4.2, osver=1.1.2, archname=i386-svr4.2 uname='talk talk 4.2 1.1.2 i386 386at ' hint=recommended, useposix=true Compiler: cc='/bin/cc', optimize='-O', gccversion= cppflags='-I/usr/include -I/usr/ucbinclude' ccflags ='-I/usr/include -I/usr/ucbinclude' stdchar='unsigned char', d_stdstdio=define, usevfork=false voidflags=15, castflags=0, d_casti32=define, d_castneg=define intsize=4, alignbytes=4, usemymalloc=n, randbits=15 Linker and Libraries: ld='/bin/cc', ldflags ='-L/usr/ccs/lib -L/usr/ucblib -L/usr/local/lib' libpth=/usr/local/lib /lib /usr/lib /usr/ccs/lib libs=-lsocket -lnsl -ldl -lld -lm -lc -lcrypt -lx libc=, so=so Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=, ccdlflags=' ' cccdlflags='-Kpic', lddlflags='-G -L/usr/ccs/lib -L/usr/ucblib -L/usr/local/lib' @INC: /opt/lib/perl5/i386-svr4.2/5.002 /opt/lib/perl5 /opt/lib/perl5/site_perl/i386-svr4.2 /opt/lib/perl5/site_perl /opt/lib/perl5/i386-svr4.2 . ------------------------------------------------------------ I will happily supply any other needed information. -Doug -- Doug McNaught Systems Integrator Towson State University Internet: doug@midget.towson.edu *or* mcnaught-d@toe.towson.edu BITNET: e7opdam@towsonvx Office: Cook 28D, (410) 830-4148 WWW Home Page: http://www.towson.edu/~doug/ ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <22819-3@oink>; Fri, 16 Feb 1996 03:28:08 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824438732:23633:0; Fri, 16 Feb 96 02:45:32 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa23597; 16 Feb 96 2:45 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa06968; 16 Feb 96 2:44 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id NAA04962 for dbi-users-real; Thu, 15 Feb 1996 13:51:36 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id NAA04948 for ; Thu, 15 Feb 1996 13:49:22 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ao11086; 15 Feb 96 17:39 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa28549; 15 Feb 96 17:33 GMT Received: from toad by oink with SMTP (PP) id <19358-0@oink>; Thu, 15 Feb 1996 17:33:15 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA01930; Thu, 15 Feb 1996 17:33:04 +0000 Date: Thu, 15 Feb 1996 17:33:04 +0000 From: Tim Bunce Message-Id: <9602151733.AA01930@toad.ig.co.uk> To: dbi-users@fugue.com, romas@online.ru Subject: Re: ora_login trough SQL*Net failed ?! X-Sun-Charset: US-ASCII content-length: 774 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: Roman Podshivalov > > PROBLEM: > sqlplus scott/tiger@V1_ALIAS - works well > sqlplus scott/tiger@V2_ALIAS - works well > > ora_login('V1_ALIAS', 'scott/tiger', '') - ORA-06401: NETCMN: invalid driver > designator > > ora_login('V2_ALIAS', 'scott/tiger', '') - ORA-12203: TNS:unable to connect to > destination > > ORACLE_SID, ORACLE_HOME, TWO_TASK - seems ok (checked in all combination) > > BTW: Alligator Descartes can connect from his oraperl to my Oracle with > scott/tiger@V1_ALIAS without any problems, but i cannot. What did i wrong ? Oraperl does not understand aliases in the dbname part. ora_login('', 'scott/tiger@ALIAS', '') might work. Or leave dbname empty and use the TWO_TASK or ORACLE_SID env var instead of @foo. Tim. ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <22820-4@oink>; Fri, 16 Feb 1996 03:28:16 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824438554:26347:1; Fri, 16 Feb 96 02:42:34 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa25178; 16 Feb 96 2:40 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id RAA05894 for dbi-users-real; Thu, 15 Feb 1996 17:47:03 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from colossus.cse.psu.edu (root@colossus.cse.psu.edu [130.203.1.2]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id RAA05890 for ; Thu, 15 Feb 1996 17:47:01 -0800 Received: by colossus.cse.psu.edu id <78382>; Thu, 15 Feb 1996 20:49:45 -0500 From: John D Groenveld To: dbi-users@fugue.com, doug@feanor.towson.edu Subject: Re: DBI test failure on Unixware 1.1.2, Perl 5.002gamma Cc: Tim.Bunce@ig.co.uk Message-Id: <96Feb15.204945est.78382@colossus.cse.psu.edu> Date: Thu, 15 Feb 1996 20:49:35 -0500 Yes, but if you install DBI and then DBD-Oracle, youll find that the Oraperl emulation works. I think Makemaker is doing something funky. Later, DBD-Oracle Makefile didnt include $PERLLIB/site_perl in INC. As soon as I learn MakeMaker, I'll send you a patch. Of course, Tim will probably release DBI 1.0 by then :) John groenvel@cse.psu.edu ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <23717-1@oink>; Fri, 16 Feb 1996 07:06:06 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824442986:12329:1; Fri, 16 Feb 96 03:56:26 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa12136; 16 Feb 96 3:55 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id RAA05922 for dbi-users-real; Thu, 15 Feb 1996 17:58:03 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from feanor.towson.edu (feanor.towson.edu [204.62.32.157]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id RAA05918 for ; Thu, 15 Feb 1996 17:58:00 -0800 Received: (from doug@localhost) by feanor.towson.edu (8.7.3/8.7.3) id UAA02495; Thu, 15 Feb 1996 20:57:08 -0500 (EST) Date: Thu, 15 Feb 1996 20:57:08 -0500 (EST) Message-Id: <199602160157.UAA02495@feanor.towson.edu> From: Doug McNaught To: groenvel@cse.psu.edu CC: dbi-users@fugue.com, Tim.Bunce@ig.co.uk In-reply-to: <96Feb15.204945est.78382@colossus.cse.psu.edu> (message from John D Groenveld on Thu, 15 Feb 1996 20:49:35 -0500) Subject: Re: DBI test failure on Unixware 1.1.2, Perl 5.002gamma >From: John D Groenveld >Cc: Tim.Bunce@ig.co.uk >Date: Thu, 15 Feb 1996 20:49:35 -0500 > >Yes, but if you install DBI and then DBD-Oracle, youll find that the >Oraperl emulation works. I think Makemaker is doing something funky. >Later, DBD-Oracle Makefile didnt include $PERLLIB/site_perl in INC. >As soon as I learn MakeMaker, I'll send you a patch. Of course, Tim >will probably release DBI 1.0 by then :) OK, thanks. I'll keep working on it. -Doug -- Doug McNaught Systems Integrator Towson State University Internet: doug@midget.towson.edu *or* mcnaught-d@toe.towson.edu BITNET: e7opdam@towsonvx Office: Cook 28D, (410) 830-4148 WWW Home Page: http://www.towson.edu/~doug/ ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <23718-3@oink>; Fri, 16 Feb 1996 07:06:13 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824443464:09523:0; Fri, 16 Feb 96 04:04:24 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa09398; 16 Feb 96 4:03 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa18267; 16 Feb 96 4:02 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id QAA05744 for dbi-announce-real; Thu, 15 Feb 1996 16:45:55 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from gw.home.vix.com (gw.home.vix.com [192.5.5.1]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id QAA05740 for ; Thu, 15 Feb 1996 16:45:54 -0800 Received: by gw.home.vix.com id QAA06168; Thu, 15 Feb 1996 16:48:40 -0800 (PST) X-btw: vix.com is also gw.home.vix.com and vixie.sf.ca.us Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ai08069; 15 Feb 96 23:09 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa19935; 15 Feb 96 23:01 GMT Received: from toad by oink with SMTP (PP) id <21800-0@oink>; Thu, 15 Feb 1996 23:00:59 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA03215; Thu, 15 Feb 1996 23:00:51 +0000 Date: Thu, 15 Feb 1996 23:00:51 +0000 From: Tim Bunce Message-Id: <9602152300.AA03215@toad.ig.co.uk> To: dbi-announce@fugue.com Subject: DBI-0.67 released (minor fix for perl5.002gamma release) X-Sun-Charset: US-ASCII Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 I've uploaded DBI-0.67 to ftp.demon.co.uk/pub/perl/db/DBI. It should get mirrored out onto CPAN sites in due course. The only change is a fix to the test suite for Perl5.002gamma. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <23718-6@oink>; Fri, 16 Feb 1996 07:06:28 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824444391:12459:0; Fri, 16 Feb 96 04:19:51 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa12369; 16 Feb 96 4:19 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id SAA06042 for dbi-announce-real; Thu, 15 Feb 1996 18:21:10 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from gw.home.vix.com (gw.home.vix.com [192.5.5.1]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id SAA06033; Thu, 15 Feb 1996 18:20:39 -0800 Received: by gw.home.vix.com id SAA14509; Thu, 15 Feb 1996 18:22:40 -0800 (PST) X-btw: vix.com is also gw.home.vix.com and vixie.sf.ca.us Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id bw06318; 15 Feb 96 22:49 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa13937; 15 Feb 96 22:44 GMT Received: from toad by oink with SMTP (PP) id <21484-0@oink>; Thu, 15 Feb 1996 22:43:09 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA03128; Thu, 15 Feb 1996 22:42:59 +0000 Date: Thu, 15 Feb 1996 22:42:59 +0000 From: Tim Bunce Message-Id: <9602152242.AA03128@toad.ig.co.uk> To: dbi-users@fugue.com, doug@feanor.towson.edu Subject: DBI test failure for Perl 5.002gamma Cc: dbi-announce@fugue.com X-Sun-Charset: US-ASCII Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: Doug McNaught > > After getting 5.002gamma to compile and test successfully > (thanks in large part to Andy Dougherty) I attempted to get the DBI > module built. It compiles OK but fails the tests: > > t/min...............1..11 > ok 1 > ok 2 > ok 3 > ok 4 > ok 4 > Aborting test: output counter mismatch [test 4 answered when test 5 expected] > FAILED tests 5-11 Not really a failure just a mistake in the test suite which the latest Test::Harness module has picked up (but it's a pity that it aborts). I'll have to make another release :-( Meanwhile here's a patch: *** 1.3 1995/11/16 23:02:30 --- t/min.t 1996/02/15 22:39:51 *************** *** 22,24 **** ! print "ok 4\n"; --- 22,24 ---- ! print "ok 5\n"; *************** *** 32,34 **** return $drh if $drh; ! print "ok 5\n"; # just getting here is enough! my($class, $attr) = @_; --- 32,34 ---- return $drh if $drh; ! print "ok 6\n"; # just getting here is enough! my($class, $attr) = @_; *************** *** 41,43 **** ); ! print "ok 6\n"; # just getting here is enough! $drh; --- 41,43 ---- ); ! print "ok 7\n"; # just getting here is enough! $drh; *************** *** 57,69 **** $drh = DBI->install_driver('Test'); ! ($drh) ? print "ok 7\n" : print "not ok 7\n"; ! (DBI::_get_imp_data($drh) == 77) ? print "ok 8\n" : print "not ok 8\n"; ! ($DBI::state eq "") ? print "ok 9\n" : print "not ok 9\n"; DBI::set_err($drh, 1, "test error"); ! ($DBI::state eq "S1000") ? print "ok 10\n" : print "not ok 10\n"; DBI::set_err($drh, 1, "test error", "IM999"); ! ($DBI::state eq "IM999") ? print "ok 11\n" : print "not ok 11\n"; ! BEGIN { $tests = 11 } exit 0; --- 57,69 ---- $drh = DBI->install_driver('Test'); ! ($drh) ? print "ok 8\n" : print "not ok 8\n"; ! (DBI::_get_imp_data($drh) == 77) ? print "ok 9\n" : print "not ok 9\n"; ! ($DBI::state eq "") ? print "ok 10\n" : print "not ok 10\n"; DBI::set_err($drh, 1, "test error"); ! ($DBI::state eq "S1000") ? print "ok 11\n" : print "not ok 11\n"; DBI::set_err($drh, 1, "test error", "IM999"); ! ($DBI::state eq "IM999") ? print "ok 12\n" : print "not ok 12\n"; ! BEGIN { $tests = 12 } exit 0; Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <23944-3@oink>; Fri, 16 Feb 1996 07:11:32 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824444856:13919:1; Fri, 16 Feb 96 04:27:36 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa13904; 16 Feb 96 4:27 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa21799; 16 Feb 96 4:27 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id SAA06037 for dbi-users-real; Thu, 15 Feb 1996 18:20:45 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from gw.home.vix.com (gw.home.vix.com [192.5.5.1]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id SAA06033; Thu, 15 Feb 1996 18:20:39 -0800 Received: by gw.home.vix.com id SAA14509; Thu, 15 Feb 1996 18:22:40 -0800 (PST) X-btw: vix.com is also gw.home.vix.com and vixie.sf.ca.us Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id bw06318; 15 Feb 96 22:49 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa13937; 15 Feb 96 22:44 GMT Received: from toad by oink with SMTP (PP) id <21484-0@oink>; Thu, 15 Feb 1996 22:43:09 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA03128; Thu, 15 Feb 1996 22:42:59 +0000 Date: Thu, 15 Feb 1996 22:42:59 +0000 From: Tim Bunce Message-Id: <9602152242.AA03128@toad.ig.co.uk> To: dbi-users@fugue.com, doug@feanor.towson.edu Subject: DBI test failure for Perl 5.002gamma Cc: dbi-announce@fugue.com X-Sun-Charset: US-ASCII Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: Doug McNaught > > After getting 5.002gamma to compile and test successfully > (thanks in large part to Andy Dougherty) I attempted to get the DBI > module built. It compiles OK but fails the tests: > > t/min...............1..11 > ok 1 > ok 2 > ok 3 > ok 4 > ok 4 > Aborting test: output counter mismatch [test 4 answered when test 5 expected] > FAILED tests 5-11 Not really a failure just a mistake in the test suite which the latest Test::Harness module has picked up (but it's a pity that it aborts). I'll have to make another release :-( Meanwhile here's a patch: *** 1.3 1995/11/16 23:02:30 --- t/min.t 1996/02/15 22:39:51 *************** *** 22,24 **** ! print "ok 4\n"; --- 22,24 ---- ! print "ok 5\n"; *************** *** 32,34 **** return $drh if $drh; ! print "ok 5\n"; # just getting here is enough! my($class, $attr) = @_; --- 32,34 ---- return $drh if $drh; ! print "ok 6\n"; # just getting here is enough! my($class, $attr) = @_; *************** *** 41,43 **** ); ! print "ok 6\n"; # just getting here is enough! $drh; --- 41,43 ---- ); ! print "ok 7\n"; # just getting here is enough! $drh; *************** *** 57,69 **** $drh = DBI->install_driver('Test'); ! ($drh) ? print "ok 7\n" : print "not ok 7\n"; ! (DBI::_get_imp_data($drh) == 77) ? print "ok 8\n" : print "not ok 8\n"; ! ($DBI::state eq "") ? print "ok 9\n" : print "not ok 9\n"; DBI::set_err($drh, 1, "test error"); ! ($DBI::state eq "S1000") ? print "ok 10\n" : print "not ok 10\n"; DBI::set_err($drh, 1, "test error", "IM999"); ! ($DBI::state eq "IM999") ? print "ok 11\n" : print "not ok 11\n"; ! BEGIN { $tests = 11 } exit 0; --- 57,69 ---- $drh = DBI->install_driver('Test'); ! ($drh) ? print "ok 8\n" : print "not ok 8\n"; ! (DBI::_get_imp_data($drh) == 77) ? print "ok 9\n" : print "not ok 9\n"; ! ($DBI::state eq "") ? print "ok 10\n" : print "not ok 10\n"; DBI::set_err($drh, 1, "test error"); ! ($DBI::state eq "S1000") ? print "ok 11\n" : print "not ok 11\n"; DBI::set_err($drh, 1, "test error", "IM999"); ! ($DBI::state eq "IM999") ? print "ok 12\n" : print "not ok 12\n"; ! BEGIN { $tests = 12 } exit 0; Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <29151-0@oink>; Fri, 16 Feb 1996 18:12:47 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824494118:12841:0; Fri, 16 Feb 96 18:08:38 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa12125; 16 Feb 96 18:07 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id IAA07702 for dbi-users-real; Fri, 16 Feb 1996 08:46:50 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from deimos (deimos.sovam.com [194.67.1.156]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id IAA07698 for ; Fri, 16 Feb 1996 08:46:44 -0800 Received: from ariel ([194.67.3.216]) by deimos.sovam.com with ESMTP id <260576-8891>; Fri, 16 Feb 1996 19:49:24 +0300 Date: Fri, 16 Feb 1996 19:49:24 +0300 (MSK) From: Roman Podshivalov Reply-To: Roman Podshivalov Subject: DBI-67 & DBD-Oracle 0.28 & Oracle 7.2.2.4 on Solaris 2.4 To: dbi-users@fugue.com cc: Tim.Bunce@ig.co.uk Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; LANGUAGE=russian Everythings work fine in local case. Whan i try connect trough SQL*Net - got errors: When use V1_ALIAS - ORA-06401: NETCMN: invalid driver designator Whae use V2_ALIAS - ORA-12203: TNS:unable to connect to destination in all combination of ORACLE_SID, TWO_TASK SQL*Net configuration tested and approved and work fine with native apps. PS: can any 1 send to me builded DBD-Oracle0.28 for Solaris 2.4 with previous Oracle version ? If so pls ftp.pb.frb.ru/pub/incoming. Be patient 64K overseas. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <29265-0@oink>; Fri, 16 Feb 1996 18:17:46 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824494462:15993:0; Fri, 16 Feb 96 18:14:22 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa15804; 16 Feb 96 18:13 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa27630; 16 Feb 96 18:12 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id FAA07254 for dbi-users-real; Fri, 16 Feb 1996 05:21:56 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from scylla.sovam.com (scylla.sovam.com [194.67.2.97]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id FAA07250 for ; Fri, 16 Feb 1996 05:21:48 -0800 Received: from pb.frb.ru by scylla.sovam.com with SMTP id AA08719 (5.67b8s3p1/IDA-1.5); Fri, 16 Feb 1996 16:18:59 +0300 Received: from bruchmula.pb.frb.ru by pb.frb.ru with SMTP id AA07148 (5.65.kiae-1 ); Fri, 16 Feb 1996 16:54:02 +0300 Date: Fri, 16 Feb 1996 16:54:02 +0300 Message-Id: <199602161354.AA07148@pb.frb.ru> X-Sender: romas@pb.frb.ru X-Mailer: Windows Eudora Light Version 1.5.2 Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" To: dbi-users@fugue.com From: "Roman L. Podshivalov" Subject: DBD-Oracle-0.28 make failed Cc: Tim.Bunce@ig.co.uk perl 5.002g I thing some misconfiguration in include PATH.... Of course i can can correct by hand, but WHY ? root@chronos /users/src/DBperl/DBI-0.67 # make install Skipping /usr/local/lib/perl5/site_perl/sun4-solaris/auto/DBI/DBI.so (unchanged) Skipping /usr/local/lib/perl5/site_perl/sun4-solaris/auto/DBI/DBI.bs (unchanged) Skipping /usr/local/lib/perl5/site_perl/sun4-solaris/DBI/DBIXS.h (unchanged) ^^^^^^^^^^^^^^^^^^^^^^^^^^^^ Skipping /usr/local/lib/perl5/site_perl/DBD/ExampleP.pm (unchanged) Skipping /usr/local/lib/perl5/site_perl/DBD/NullP.pm (unchanged) Skipping /usr/local/lib/perl5/site_perl/DBD/Sponge.pm (unchanged) Skipping /usr/local/lib/perl5/site_perl/DBI.pm (unchanged) Writing /usr/local/lib/perl5/site_perl/sun4-solaris/auto/DBI/.packlist Appending installation info to /usr/local/lib/perl5/sun4-solaris/5.002/perllocal .pod root@chronos /users/src/DBperl/DBD-Oracle-0.28 # make cc -c -I/usr/oracle/rdbms/demo -I/usr/local/lib/perl5/sun4-solaris/5.002/DBI -I/ ^^^^^^^^^^^^^^^^^^^ usr/local/include -O -DVERSION=\"0.28\" -DXS_VERSION=\"0.28\" -Kpic -I/usr/local /lib/perl5/sun4-solaris/5.002/CORE/ Oracle.c "./Oracle.h", line 14: cannot find include file: "./dbdimp.h", line 22: syntax error before or at: dbih_drc_t "./dbdimp.h", line 22: cannot recover from previous errors cc: acomp failed for Oracle.c make: *** [Oracle.o] Error 2 Rock&Roll forever Romas ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <06717-1@oink>; Mon, 19 Feb 1996 07:08:17 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824503572:00334:0; Fri, 16 Feb 96 20:46:12 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa00249; 16 Feb 96 20:45 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id LAA08290 for dbi-users-real; Fri, 16 Feb 1996 11:32:03 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from colossus.cse.psu.edu (root@colossus.cse.psu.edu [130.203.1.2]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id LAA08286 for ; Fri, 16 Feb 1996 11:32:02 -0800 Received: from localhost by colossus.cse.psu.edu with SMTP id <78756>; Fri, 16 Feb 1996 14:34:47 -0500 X-Mailer: exmh version 1.6.1 5/23/95 To: Roman Podshivalov cc: dbi-users@fugue.com Subject: Re: DBI-67 & DBD-Oracle 0.28 & Oracle 7.2.2.4 on Solaris 2.4 In-reply-to: Your message of "Fri, 16 Feb 1996 11:49:24 EST." Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Fri, 16 Feb 1996 14:13:44 -0500 From: John D Groenveld Message-Id: <96Feb16.143447est.78756@colossus.cse.psu.edu> Roman, Have you tried unsetting all of your Oracle variables except for TNS_ADMIN and ORACLE_HOME and then using only ora_login("","scott/tiger\@V2alias","")? TWO_TASK and ORACLE_SID are not needed and might confuse ora_login. Just a thought, John groenvel@cse.psu.edu ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <06716-26@oink>; Mon, 19 Feb 1996 07:13:16 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824523081:13016:0; Sat, 17 Feb 96 02:11:21 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa12721; 17 Feb 96 2:10 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa02192; 17 Feb 96 2:09 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id QAA09460 for dbi-users-real; Fri, 16 Feb 1996 16:59:27 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from alpha.xerox.com (alpha.Xerox.COM [13.1.64.93]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id QAA09456 for ; Fri, 16 Feb 1996 16:59:26 -0800 Received: from eliza.parc.xerox.com ([13.2.12.4]) by alpha.xerox.com with SMTP id <15040(15)>; Fri, 16 Feb 1996 17:01:46 PST Received: by eliza.parc.xerox.com id <86021>; Fri, 16 Feb 1996 17:01:39 -0800 From: Yuxi Yin To: dbi-users@fugue.com Subject: problem to install DBD(Oracle) for perl5 Message-Id: <96Feb16.170139pst.86021@eliza.parc.xerox.com> Date: Fri, 16 Feb 1996 17:01:36 PST I am using Oracle7.1.3, perl5.002b2 and my platform is SunSparc20 SunOS4.1.3. The output of "perl -e 'use Config; print Config::myconfig()'" is: Summary of my perl5 (5.0 patchlevel 2) configuration: Platform: osname=sunos, osver=4.1.3_u1, archname=sun4-sunos uname='sunos falcon 4.1.3_u1 2 sun4m ' hint=recommended, useposix=true Compiler: cc='gcc', optimize='-O', gccversion=2.5.8 cppflags='' ccflags ='' stdchar='unsigned char', d_stdstdio=, usevfork=false voidflags=15, castflags=0, d_casti32=define, d_castneg=define intsize=4, alignbytes=8, usemymalloc=y, randbits=31 Linker and Libraries: ld='ld', ldflags =' -L/usr/local/lib' libpth=/usr/local/lib /lib /usr/lib /usr/ucblib libs=-lnsl -ldbm -ldl -lm -lc -lposix libc=/lib/libc.so.1.9, so=so Dynamic Linking: dlsrc=dl_none.xs, dlext=none, d_dlsymun=, ccdlflags='' cccdlflags='', lddlflags='' I built perl5.002b2 with gcc compiler and then rebuilt the perl with DBI-0.66, without problem(test is almost 100% sucessful). Then I tried to rebuild perl with DBD-Oracle-0.27 using "make" and got the errors with the following command: gcc -L/usr/local/lib -o perl ./perlmain.o /usr/local/lib/perl5/sun4-sunos/5.002/CORE/libperl.a /usr/local/lib/perl5/sun4-sunos/5.002/auto/Socket/Socket.a /usr/local/lib/perl5/sun4-sunos/5.002/auto/Safe/Safe.a /usr/local/lib/perl5/sun4-sunos/5.002/auto/SDBM_File/SDBM_File.a /usr/local/lib/perl5/sun4-sunos/5.002/auto/POSIX/POSIX.a /usr/local/lib/perl5/sun4-sunos/5.002/auto/ODBM_File/ODBM_File.a /usr/local/lib/perl5/sun4-sunos/5.002/auto/NDBM_File/NDBM_File.a /usr/local/lib/perl5/sun4-sunos/5.002/auto/Fcntl/Fcntl.a /usr/local/lib/perl5/sun4-sunos/5.002/auto/DynaLoader/DynaLoader.a /usr/local/lib/perl5/sun4-sunos/5.002/auto/DBI/DBI.a ./blib/sun4-sunos/auto/DBD/Oracle/Oracle.a `cat ./blib/sun4-sunos/auto/DBD/Oracle/extralibs.all` -lnsl -ldbm -lm -lc -lposix The error msg. is like: oci.o(.text+0x30c): undefined reference to `_GLOBAL_OFFSET_TABLE_' oci.o(.text+0x314): undefined reference to `_GLOBAL_OFFSET_TABLE_' oci.o(.text+0x334): relocation truncated to fit _upioep+0x0 (type BASE10) oci.o(.text+0xcd8): undefined reference to `_GLOBAL_OFFSET_TABLE_' oci.o(.text+0xce0): undefined reference to `_GLOBAL_OFFSET_TABLE_' oci.o(.text+0xcf8): relocation truncated to fit _upihst+0x0 (type BASE10) oci.o(.text+0xd50): undefined reference to `_GLOBAL_OFFSET_TABLE_' oci.o(.text+0xd60): more undefined references to `_GLOBAL_OFFSET_TABLE_' follow oci.o(.text+0xd74): relocation truncated to fit _upihst+0x0 (type BASE10) oci.o(.text+0xde0): relocation truncated to fit _ocitbl+0x0 (type BASE10) oci.o(.text+0xf7c): relocation truncated to fit _ocitbl+0x0 (type BASE10) osnptt.o(.text+0x18): relocation truncated to fit _osnpif+0x0 (type BASE10) ...(more errors) I thought probably this problem is caused because I used /usr/5bin/cc compiler for Oracle library, so I tried to use /usr/5bin/cc compiler for perl5.002b2. But I got error when it was building the shared library for ext as: Making Fcntl (dynamic) make[1]: Entering directory `/falcon1/perl5/perl5.002b2/ext/Fcntl' make[1]: Leaving directory `/falcon1/perl5/perl5.002b2/ext/Fcntl' make[1]: Entering directory `/falcon1/perl5/perl5.002b2/ext/Fcntl' cc -c -O -DVERSION=\"0.10\" -DXS_VERSION=\"0.10\" -I../.. Fcntl.c LD_RUN_PATH="" ld -o ../../lib/auto/Fcntl/Fcntl.none Fcntl.o Fcntl.o(.text+0xc): undefined reference to `croak' Fcntl.o(.text+0x20): undefined reference to `errno' Fcntl.o(.text+0x24): undefined reference to `errno' Fcntl.o(.text+0x44): undefined reference to `errno' Fcntl.o(.text+0x54): undefined reference to `strncmp' ...(more errors) Could anyone help me with this? Thanks in advance, Yuxi yin@parc.xerox.com ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <07027-12@oink>; Mon, 19 Feb 1996 07:42:12 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824701891:29769:0; Mon, 19 Feb 96 03:51:31 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa29669; 19 Feb 96 3:50 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa09742; 19 Feb 96 3:50 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id SAA03256 for dbi-users-real; Sun, 18 Feb 1996 18:41:48 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from feanor.towson.edu (feanor.towson.edu [204.62.32.157]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id SAA03252 for ; Sun, 18 Feb 1996 18:41:45 -0800 Received: (from doug@localhost) by feanor.towson.edu (8.7.3/8.7.3) id VAA05290; Sun, 18 Feb 1996 21:42:39 -0500 (EST) Date: Sun, 18 Feb 1996 21:42:39 -0500 (EST) Message-Id: <199602190242.VAA05290@feanor.towson.edu> From: Doug McNaught To: Tim.Bunce@ig.co.uk CC: dbi-users@fugue.com In-reply-to: <9602152242.AA03128@toad.ig.co.uk> (message from Tim Bunce on Thu, 15 Feb 1996 22:42:59 +0000) Subject: Re: DBI test failure for Perl 5.002gamma >Date: Thu, 15 Feb 1996 22:42:59 +0000 >From: Tim Bunce >Cc: dbi-announce@fugue.com >X-Sun-Charset: US-ASCII >Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > > >Not really a failure just a mistake in the test suite which the latest >Test::Harness module has picked up (but it's a pity that it aborts). OK. I went ahead and installed DBI despite the failure. I then tried to compile DBD::Oracle. The compilation failed initially because it couldn't find the include file DBIXS.h. I looked for the file in the perl5 install library, and made the following patch: *** Makefile.PL Sun Feb 18 20:55:32 1996 --- Makefile.PL.orig Sun Feb 18 20:51:41 1996 *************** *** 65,71 **** $OCIINCLUDE = $MK{INCLUDE} || ''; $opts{LIBS} = [ $sysliblist ]; ! $opts{INC} = "$OCIINCLUDE -I$OH/rdbms/demo -I$Config{installsitearch}/DBI"; $opts{dynamic_lib} = { OTHERLDFLAGS => '-L$(LIBHOME) $(COMPOBJS) '.$linkwith }; $opts{OBJECT} = '$(O_FILES)'; --- 65,71 ---- $OCIINCLUDE = $MK{INCLUDE} || ''; $opts{LIBS} = [ $sysliblist ]; ! $opts{INC} = "$OCIINCLUDE -I$OH/rdbms/demo -I$Config{archlibexp}/DBI"; $opts{dynamic_lib} = { OTHERLDFLAGS => '-L$(LIBHOME) $(COMPOBJS) '.$linkwith }; $opts{OBJECT} = '$(O_FILES)'; I then tried compiling and testing the module. The compilation succeeded (with some warnings) but the test failed in what looks like a very bad way. I don't know enough about what's going on to even start tracking down the problem. I'm including a script of the entire build (after patching Makefile.PL) because I'm not sure what's relevant. Script started on Sun Feb 18 21:16:39 1996 # perl Makefile.PL Configuring DBD::Oracle version 0.27... Remember to actually read the README file! Using Oracle in /oracle Oracle sysliblist: -lsocket -lnsl -lelf -lm -ldl Using /oracle/proc/lib/proc.mk version 7.20 System: perl5.002 talk talk 4.2 1.1.2 i386 386at i386-svr4.2 dl_dlopen.xs Compiler: /bin/cc -O -I/usr/include -I/usr/ucbinclude Oracle proc.mk would have used these values but we override them: CC: cc CFLAGS: -I. -O LDFLAGS: -L$(LIBHOME) Checking if your kit is complete... Looks good Processing hints file hints/svr4.pl Warning (non-fatal): Importing of %att is deprecated [PM] use $self instead Warning (non-fatal): Importing of %att is deprecated [PM] use $self instead Warning (non-fatal): Importing of %att is deprecated [EXTRALIBS] use $self instead Warning (non-fatal): Importing of %att is deprecated [EXTRALIBS][-lsocket -lnsl -lelf -lm -ldl -L$(LIBHOME) $(OCILDLIBS)] use $self instead Writing Makefile for DBD::Oracle # make umask 0 && cp Oraperl.pm ./blib/lib//Oraperl.pm umask 0 && cp oraperl.ph ./blib/lib//oraperl.ph umask 0 && cp Oracle.pm ./blib/lib//DBD/Oracle.pm /opt/bin/perl -I/opt/lib/perl5/i386-svr4.2/5.002 -I/opt/lib/perl5 /opt/lib/perl5/ExtUtils/xsubpp -typemap /opt/lib/perl5/ExtUtils/typemap Oracle.xs >Oracle.tc && mv Oracle.tc Oracle.c Please specify prototyping behavior for Oracle.xs (see perlxs manual) /bin/cc -c -I/oracle/rdbms/demo -I/opt/lib/perl5/site_perl/i386-svr4.2/DBI -I/usr/include -I/usr/ucbinclude -O -DVERSION=\"0.27\" -DXS_VERSION=\"0.27\" -Kpic -I/opt/lib/perl5/i386-svr4.2/5.002/CORE/ Oracle.c UX:acomp: WARNING: "Oracle.c", line 144: warning: end-of-loop code not reached UX:acomp: WARNING: "Oracle.c", line 252: warning: end-of-loop code not reached UX:acomp: WARNING: "Oracle.c", line 261: warning: end-of-loop code not reached UX:acomp: WARNING: "Oracle.c", line 295: warning: end-of-loop code not reached UX:acomp: WARNING: "Oracle.c", line 390: warning: end-of-loop code not reached UX:acomp: WARNING: "Oracle.c", line 394: warning: end-of-loop code not reached /bin/cc -c -I/oracle/rdbms/demo -I/opt/lib/perl5/site_perl/i386-svr4.2/DBI -I/usr/include -I/usr/ucbinclude -O -DVERSION=\"0.27\" -DXS_VERSION=\"0.27\" -Kpic -I/opt/lib/perl5/i386-svr4.2/5.002/CORE/ dbdimp.c UX:acomp: WARNING: "dbdimp.c", line 811: warning: argument is incompatible with prototype: arg #1 Running Mkbootstrap for DBD::Oracle () chmod 644 Oracle.bs LD_RUN_PATH="/lib:/usr/ccs/lib" /bin/cc -o ./blib/arch//auto/DBD/Oracle/Oracle.so -G -L/usr/ccs/lib -L/usr/ucblib -L/usr/local/lib Oracle.o dbdimp.o -L/oracle/lib /oracle/lib/libocic.a /oracle/lib/osntab.o /oracle/lib/libsqlnet.a /oracle/lib/libsqlnet.a /oracle/lib/libora.a /oracle/lib/libsqlnet.a /oracle/lib/libnetwork.a /oracle/lib/libcore.a -lsocket -lnsl -lelf -lm -ldl chmod 755 ./blib/arch//auto/DBD/Oracle/Oracle.so cp Oracle.bs ./blib/arch//auto/DBD/Oracle/Oracle.bs chmod 644 ./blib/arch//auto/DBD/Oracle/Oracle.bs # make test PERL_DL_NONLAZY=1 /opt/bin/perl -I./blib/arch/ -I./blib/lib/ -I/opt/lib/perl5/i386-svr4.2/5.002 -I/opt/lib/perl5 -e 'use Test::Harness qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t/*.t t/base..............install_driver(Oracle) failed: Can't load './blib/arch//auto/DBD/Oracle/Oracle.so' for module DBD::Oracle: dynamic linker: /opt/bin/perl: relocation error: symbol not found: gettimeofday at /opt/lib/perl5/DynaLoader.pm line 140. at blib/lib//DBD/Oracle.pm line 18 DBI::install_driver called at t/base.t line 16 FAILED tests 4-5 Failed 2/5 tests, 60.00% okay Test returned status 2 (wstat 512) t/main..............ok Failed 1 test script, 50.00% okay. 2/6 subtests failed, 66.67% okay. *** Error code 2 (bu21) make: fatal error. # exit script done on Sun Feb 18 21:19:26 1996 If you're still with me, thanks for making the effort. I'll be happy to supply any more information that might be needed. -Doug -- Doug McNaught Systems Integrator Towson State University Internet: doug@midget.towson.edu *or* mcnaught-d@toe.towson.edu BITNET: e7opdam@towsonvx Office: Cook 28D, (410) 830-4148 WWW Home Page: http://www.towson.edu/~doug/ ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <06873-67@oink>; Mon, 19 Feb 1996 07:42:27 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824706783:14556:0; Mon, 19 Feb 96 05:13:03 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa14357; 19 Feb 96 5:11 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id UAA03435 for dbi-users-real; Sun, 18 Feb 1996 20:28:46 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from colossus.cse.psu.edu (root@colossus.cse.psu.edu [130.203.1.2]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id UAA03431 for ; Sun, 18 Feb 1996 20:28:41 -0800 Received: from localhost by colossus.cse.psu.edu with SMTP id <78807>; Sun, 18 Feb 1996 23:31:55 -0500 X-Mailer: exmh version 1.6.1 5/23/95 To: Doug McNaught cc: dbi-users@fugue.com Subject: Re: DBI test failure for Perl 5.002gamma In-reply-to: Your message of "Sun, 18 Feb 1996 21:42:39 EST." <199602190242.VAA05290@feanor.towson.edu> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Sun, 18 Feb 1996 23:30:52 -0500 From: John D Groenveld Message-Id: <96Feb18.233155est.78807@colossus.cse.psu.edu> Try just changing in Makefile INC to point to your machine dependent DBI header file. In my case INC = -I/home3/oracle/product/7.1.4/rdbms/demo -I/opt/gnu/lib/perl5/site_perl/sun4-solaris/DBI. Editing Makefile is of course just plain stupid, but as I've said MakeMaker scares me :) Your mileage will vary. Have a great day, John groenvel@cse.psu.edu BTW DBI-0.67 is now available for perl5.002gamma users and fixes the DBI make test failure. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <20554-16@oink>; Mon, 19 Feb 1996 14:02:53 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824726217:24850:2; Mon, 19 Feb 96 10:36:57 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa24463; 19 Feb 96 10:36 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id BAA04093 for dbi-users-real; Mon, 19 Feb 1996 01:20:42 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from mailgw.claircom.com (mailgw.claircom.com [199.5.241.51]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id BAA04089 for ; Mon, 19 Feb 1996 01:20:41 -0800 Received: from nimo.claircom.com by mailgw.claircom.com with smtp (Smail3.1.26.7 #2) id m0toRpE-0004tlC; Mon, 19 Feb 96 01:24 PST Received: from airone.claircom.com by nimo.claircom.com with smtp (Smail3.1.26.7 #2) id m0toRpD-0005NjC; Mon, 19 Feb 96 01:24 PST Received: from soc4.airone.claircom.com by airone.claircom.com (5.x/SMI-SVR4) id AA29740; Mon, 19 Feb 1996 01:19:37 -0800 Received: from soc4 (localhost) by soc4.airone.claircom.com (4.1/SMI-4.1) id AA27400; Mon, 19 Feb 96 01:21:48 PST Message-Id: <3128411D.167EB0E7@airone.claircom.com> Date: Mon, 19 Feb 1996 01:21:33 -0800 From: William Warner X-Mailer: Mozilla 2.0b6a (X11; I; SunOS 4.1.3_U1 sun4m) Mime-Version: 1.0 Newsgroups: comp.lang.perl.misc To: Perl DBI , PerlTk Subject: Re: Looking for spreadsheet like functions Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit William Warner wrote: [ text deleted ... ] > $t=Table->new(-rows => 100, -columns => 100); > $value=$t(-row => 20, -column => 20); # the value in (20, 20) > @column_20=$t->column(-column => 20); > $region=$t->region(-upperleft => [16, 5], -lowerright => [21, 31]); > $avg=&mean($t->column(-column = 20)); > $sigma=&std_dev(@column_20); I received two replies to my last posting. Both were helpful, but only in that they confirmed that what I'm looking for does not exist. I started work on a solution. I was hoping to receive some feedback to the ideas I've had so far. CONCEPT: I am trying to come up with a two dimensional data structure with methods that relate easily to lists and hashes. In other words, it should be built easily from lists or hashes and it should be easily broken apart into lists or hashes. It's called a rectangular hash, or RHASH. Thus far, RHASH is a simple two dimensional list of lists with ordered lists of keys for the rows and the columns. It has some properties of a database table. It also shares some properties with a spreadsheet. It is like a hash, in that data may be stored an retrieved by means of keys. It's not like a hash, in that the keys have an order which is determined by the user as the RHASH is created. It is like a database table, in that one may refer to data via a table.column construct. It is like a spreadsheet in that colums and rows my be interchanged. Unlike a spreadsheet, I think it should be row and column oriented, not cell oriented. A quick enhancement to this would store display formats for columns. Actually, an equally quick enhancement would allow the same for individual cells. For my app, it's really a necessity, but it would be useful for all kinds of common perl puzzles. For example, to look up a hash key by it's value, use an RHASH. MY RESERVATIONS This module should be based on extensions to perl written in C. Right now, it's all Perl. Also tries to return lists and hashed as opposed to references. If I return references, I give direct write access to the internals, and will get the keys out of sync with the data table. THE OBJECT'S METHODS package RHASH; sub new { my %opt=@_; my($rowkeys, $colkeys, $table)=@opt{('-rowkeys', '-colkeys', '-table')}; my $rhash={ "rowkeys" => $rowkeys, "colkeys" => $colkeys, "table" => $table }; @{$rhash->{rows}}{@$rowkeys}=(0..$#$rowkeys) if $rowkeys; @{$rhash->{columns}}{@$colkeys}=(0..$#$colkeys) if $colkeys; bless $rhash } # end new sub splice { # Usage: # # $t=$rhash->rect_splice{ '-leftkey' => $leftkey, # '-rightkey' => $rightkey, # '-topkey' => $topkey, # '-bottomkey' => $bottomkey, # '-replace' => $replace # } # # where the keys define a rectangle in $rhash. That rectangle # will be copied to $t, another rhash. If $replace supplied, # replace the rectangle with $replace. } sub row_assign { # $rhash->row_assign('-source' => $lref, # '-rowkey' => $rowkey # ); # Assign a hash ref or list ref to a row in an rhash. New columns # and rows (and they're respective keys) are handled automatically. } sub row_read { # @row = $rhash->row_read('-rowkey' => $rowkey, # '-leftkey' => $leftkey, # '-rightkey' => $rightkey # ) # returns a list (not a hash) of a row specified $rowkey, # in the column range $leftkey to $rightkey } sub col_assign { # same as row assign, but input syntax for columns. } sub col_read {} sub rowkeys { # return an ordered list of the rowkeys of an rhash } sub colkeys { # return an ordered list of the colkeys of an rhash } -- William Warner billw@airone.claircom.com work: 206-389-8210 portable: 206-915-1157 page: 206-986-0399 ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <21152-0@oink>; Mon, 19 Feb 1996 14:32:16 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824739452:07377:1; Mon, 19 Feb 96 14:17:32 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa07167; 19 Feb 96 14:17 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa01579; 19 Feb 96 14:16 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id EAA04322 for dbi-users-real; Mon, 19 Feb 1996 04:49:49 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from cursci.cursci.co.uk (cursci.cursci.co.uk [193.112.128.3]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id EAA04318 for ; Mon, 19 Feb 1996 04:49:40 -0800 Received: from gateway.cursci.co.uk by cursci.cursci.co.uk with SMTP (5.65/1.2(ep 1.9)-eef) id AA25600; Mon, 19 Feb 96 12:52:54 GMT Message-Id: <9602191252.AA25600@cursci.cursci.co.uk> Date: Mon, 19 Feb 1996 14:01:00 +0000 From: Mark Lester Subject: long fields To: DBI List X-Mailer: Worldtalk (NetConnex V3.50c)/MIME Oh dear, not as long as I had hoped, around about 81 bytes at the moment. I can panic and change all the longs to a biggish varchar2 field, but does anyone know the 'official' solution. We are also progressing with our own implementation of meta language extensions to HTML in order to provide a CGI interface consisting of a single engine program which reads the relevant HTML template page, and in evaluating it read data from 'views' and 'fill in' the page to be delivered. We will have quite a powerful reporting/page description language at the end, allowing me to get HTML 'Programmers' to knock up pages and database boys to set up RDBMSs, and keep the wild hacking down a little. If I am guilty of total ignorance of what everyone else is up to, please tell. We are about to write this program properly again (it is currently a dodgey little SGML tree builder and a tree traverser which looks up routines of the same name as the tag for processing functionality). I will take a look at the SGML parser module and attempt to build upon it. Regards Mark Lester (Electronic Press) ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <24065-16@oink>; Tue, 20 Feb 1996 07:08:55 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824767993:13361:0; Mon, 19 Feb 96 22:13:13 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa12949; 19 Feb 96 22:12 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa02094; 19 Feb 96 22:11 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id KAA04949 for dbi-users-real; Mon, 19 Feb 1996 10:26:40 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from deimos (deimos.sovam.com [194.67.1.156]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id KAA04945 for ; Mon, 19 Feb 1996 10:26:32 -0800 Received: from ariel ([194.67.3.216]) by deimos.sovam.com with ESMTP id <260556-8891>; Mon, 19 Feb 1996 21:29:37 +0300 Date: Mon, 19 Feb 1996 21:29:34 +0300 (MSK) From: Roman Podshivalov Reply-To: Roman Podshivalov Subject: Re: ora_login trough SQL*Net failed ?! To: Tim Bunce cc: dbi-users@fugue.com In-Reply-To: <9602161218.AA06434@toad.ig.co.uk> Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; LANGUAGE=russian > > > From: "Roman L. Podshivalov" > > > > >ora_login('', 'scott/tiger@ALIAS', '') might work. > > > > > >Or leave dbname empty and use the TWO_TASK or ORACLE_SID env var instead > > >of @foo. > > > > Also doesnot work > > Please post a short example *to the dbi-users list*. Something like > > $ TWO_TASK=foo; export TWO_TASK > > $ sqlplus scott/tiger > > $ perl test.pl > > where test.pl is > > use Oraperl; > ora_login('', 'scott/tiger', '') or die $ora_errno; > print "ok\n"; > > Tim. > Thanx for interest. I'll report all problems in details in some days/weeks. Some technical reorg ;-( Romas ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <24065-17@oink>; Tue, 20 Feb 1996 07:09:05 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824767994:13370:0; Mon, 19 Feb 96 22:13:14 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa13166; 19 Feb 96 22:12 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa02425; 19 Feb 96 22:11 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id KAA04927 for dbi-users-real; Mon, 19 Feb 1996 10:11:10 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from gate.ti.com (news.ti.com [192.94.94.33]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id KAA04923 for ; Mon, 19 Feb 1996 10:11:06 -0800 Received: from tilde.csc.ti.com ([128.247.160.56]) by gate.ti.com (8.6.12/) with ESMTP id MAA20827; Mon, 19 Feb 1996 12:12:26 -0600 Received: from tiuk.ti.com (strange.tiuk.ti.com [134.183.5.9]) by tilde.csc.ti.com (8.7.3/8.7.3) with SMTP id MAA19284; Mon, 19 Feb 1996 12:11:53 -0600 (CST) Received: from pluto by tiuk.ti.com (4.1/SMI-4.1) id AA22672; Mon, 19 Feb 96 18:09:44 GMT Received: by pluto (4.1) id AA21771; Mon, 19 Feb 96 18:11:19 GMT Date: Mon, 19 Feb 96 18:11:19 GMT Message-Id: <9602191811.AA21771@pluto> To: Tim.Bunce@ig.co.uk Cc: ptk@guest.wpi.edu, billw@airone.claircom.com, dbi-users@fugue.com From: Nick Ing-Simmons Organization: via, but not speaking for : Texas Instruments Ltd. Subject: Re: Looking for spreadsheet like functions References: <9602191444.AA21597@toad.ig.co.uk> In-Reply-To: Tim Bunce's message of Mon, 19 Feb 1996 14:44:20 +0000 In <9602191444.AA21597@toad.ig.co.uk> On Mon, 19 Feb 1996 14:44:20 +0000 Tim Bunce writes: > >Two quick suggestions: 1) Beware of over generalising 2) Use subclassing > Good points. >If the primary goal is the implementation of a spreadsheet then RHASH >isn't the right name for this. It's a form of 'table' and the name >should reflect that clearly. My original comment was that Tk::Table was not a good basis for 'large' spreadsheets. This is true of any one-X-window-per item implementation. That is not to say that a 'spreadsheet' cannot be implemented using Table. However to be efficient and not need 1M windows for 1000x1000 spreadsheet the table-entry <-> spreadsheet-entry needs to be dynamic. Thus it would be a 'contains' rather than an 'ISA' relationship. Whatever Tk constructs end up displaying the 'spreadsheet' will probably be passed (and re-passed as things scroll) references to 'things' in a larger 'something'. ties to array slices would be nice, but don't exist yet. Thus the idea of 'RHASH' (if not the name) as a basis is valid, although I would be tempted to try and use 2D perl array as-is ... > > >> MY RESERVATIONS >> >> This module should be based on extensions to perl written in C. Right >> now, it's all Perl. > >Don't worry about that now. Agreed. > >> Also tries to return lists and hashed as opposed to references. If I >> return references, I give direct write access to the internals, and will >> get the keys out of sync with the data table. > >Design choice. Refs to individual values, rather than structural components, >are probably a good idea. (Having row and column objects is possibly also a >good idea.) >Tim. ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <24064-17@oink>; Tue, 20 Feb 1996 07:09:21 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824770953:08570:1; Mon, 19 Feb 96 23:02:33 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa06146; 19 Feb 96 23:02 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id LAA05177 for dbi-users-real; Mon, 19 Feb 1996 11:58:42 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from solair1.inter.NL.net (solair1.inter.NL.net [193.78.240.13]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id LAA05173 for ; Mon, 19 Feb 1996 11:58:40 -0800 Received: from utr98-16.Utrecht.NL.net by solair1.inter.NL.net (5.65b/solair1.Inter.NL.net-1.31) id AA28478; Mon, 19 Feb 1996 21:02:04 +0100 X-Sender: pchen@solair1.inter.nl.net Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Mon, 19 Feb 1996 21:02:07 +0100 To: dbi-users@fugue.com From: petechen@math.rutgers.edu (Peter Chen) Subject: MacPerl5 module for accessing Butler database Cc: mac-perl@iis.ee.ethz.ch, butler-sql@lists.Stanford.EDU Hi, I am in the processing of making a MacPerl5 module for accessing the Butler database. Since this module currently is only useful on Macs, and it won't contain any C interface to Perl, I am not quite sure what's the preferred way of setting up something like this. Should I set it up in a way similar to oraperl, or DBD::Oracle? You guys will have to excuse me if I don't have the full picture about DBD/DBI, etc. I just got back onto this list today after a full year of working on only Macs (not that I'm complaining, but sometimes I do miss a Unix box, *sob*). Peter Chen ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <24065-20@oink>; Tue, 20 Feb 1996 07:09:43 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824767996:13383:0; Mon, 19 Feb 96 22:13:16 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa13302; 19 Feb 96 22:12 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa02555; 19 Feb 96 22:12 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA04857 for dbi-users-real; Mon, 19 Feb 1996 09:34:57 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-4.mail.demon.net (relay-4.mail.demon.net [158.152.1.108]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id JAA04853 for ; Mon, 19 Feb 1996 09:34:46 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-4.mail.demon.net id ai28020; 19 Feb 96 17:06 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa10030; 19 Feb 96 17:04 GMT Received: from toad by oink with SMTP (PP) id <21264-0@oink>; Mon, 19 Feb 1996 14:44:27 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA21597; Mon, 19 Feb 1996 14:44:20 +0000 Date: Mon, 19 Feb 1996 14:44:20 +0000 From: Tim Bunce Message-Id: <9602191444.AA21597@toad.ig.co.uk> To: dbi-users@fugue.com, ptk@guest.wpi.edu, billw@airone.claircom.com Subject: Re: Looking for spreadsheet like functions X-Sun-Charset: US-ASCII content-length: 1729 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: William Warner > > William Warner wrote: > [ text deleted ... ] > > > $t=Table->new(-rows => 100, -columns => 100); > > $value=$t(-row => 20, -column => 20); # the value in (20, 20) > > @column_20=$t->column(-column => 20); > > $region=$t->region(-upperleft => [16, 5], -lowerright => [21, 31]); > > $avg=&mean($t->column(-column = 20)); > > $sigma=&std_dev(@column_20); > > I received two replies to my last posting. Both were helpful, but only > in that they confirmed that what I'm looking for does not exist. > > I started work on a solution. I was hoping to receive some feedback to > the ideas I've had so far. > > CONCEPT: > > I am trying to come up with a two dimensional data structure with > methods that relate easily to lists and hashes. In other words, it > should be built easily from lists or hashes and it should be easily > broken apart into lists or hashes. It's called a rectangular hash, or > RHASH. Two quick suggestions: 1) Beware of over generalising 2) Use subclassing If the primary goal is the implementation of a spreadsheet then RHASH isn't the right name for this. It's a form of 'table' and the name should reflect that clearly. > MY RESERVATIONS > > This module should be based on extensions to perl written in C. Right > now, it's all Perl. Don't worry about that now. > Also tries to return lists and hashed as opposed to references. If I > return references, I give direct write access to the internals, and will > get the keys out of sync with the data table. Design choice. Refs to individual values, rather than structural components, are probably a good idea. (Having row and column objects is possibly also a good idea.) Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <24065-25@oink>; Tue, 20 Feb 1996 07:10:43 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824777404:02012:0; Tue, 20 Feb 96 00:50:04 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa01921; 20 Feb 96 0:49 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id NAA05418 for dbi-users-real; Mon, 19 Feb 1996 13:35:29 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from feanor.towson.edu (feanor.towson.edu [204.62.32.157]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id NAA05414 for ; Mon, 19 Feb 1996 13:35:28 -0800 Received: (from doug@localhost) by feanor.towson.edu (8.7.3/8.7.3) id QAA06790; Mon, 19 Feb 1996 16:37:36 -0500 (EST) Date: Mon, 19 Feb 1996 16:37:36 -0500 (EST) Message-Id: <199602192137.QAA06790@feanor.towson.edu> From: Doug McNaught To: groenvel@cse.psu.edu CC: dbi-users@fugue.com In-reply-to: <96Feb18.233155est.78807@colossus.cse.psu.edu> (message from John D Groenveld on Sun, 18 Feb 1996 23:30:52 -0500) Subject: Re: DBI test failure for Perl 5.002gamma >X-Mailer: exmh version 1.6.1 5/23/95 >cc: dbi-users@fugue.com >Mime-Version: 1.0 >Content-Type: text/plain; charset=us-ascii >Date: Sun, 18 Feb 1996 23:30:52 -0500 >From: John D Groenveld > >Try just changing in Makefile INC to point to your machine dependent >DBI header file. In my case INC = >-I/home3/oracle/product/7.1.4/rdbms/demo >-I/opt/gnu/lib/perl5/site_perl/sun4-solaris/DBI. Editing Makefile is >of course just plain stupid, but as I've said MakeMaker scares me :) >Your mileage will vary. Well, I wasn't quite so scared and fixed it by editing Makefile.PL. The problem seems to be somewhere in the linking, because it gets a 'symbol not found' when trying to dynamically load DBD::Oracle. -- Doug McNaught Systems Integrator Towson State University Internet: doug@midget.towson.edu *or* mcnaught-d@toe.towson.edu BITNET: e7opdam@towsonvx Office: Cook 28D, (410) 830-4148 WWW Home Page: http://www.towson.edu/~doug/ ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <02613-3@oink>; Wed, 21 Feb 1996 07:07:33 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824849109:03801:0; Tue, 20 Feb 96 20:45:09 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa01136; 20 Feb 96 20:43 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id IAA07591 for dbi-users-real; Tue, 20 Feb 1996 08:39:03 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from zcias1.ziff.com (zcias1.ziff.com [140.244.1.69]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id IAA07587 for ; Tue, 20 Feb 1996 08:39:02 -0800 Received: from iongate.staff.ichange.com (198-112-128-9.ichange.com) by zcias1.ziff.com (PMDF V5.0-5 #10330) id <01I1FO39HXWW003ODX@zcias1.ziff.com> for dbi-users@fugue.com; Tue, 20 Feb 1996 11:38:07 -0500 (EST) Received: by iongate.staff.ichange.com (IBM OS/2 SENDMAIL VERSION 1.3.2) /1.0) id AA9091; Tue, 20 Feb 1996 11:35:58 -0800 Received: from IChange with "Lotus Notes Mail Gateway for SMTP" id 16F19703E89DCDD6852562D600577A40; Tue, 20 Feb 1996 11:35:58 +0000 Date: Tue, 20 Feb 1996 11:27:42 -0400 (EDT) From: Simon Rakov Subject: DBD::MSQL 0.65pl8 aborts on INSERT, CREATE statements. To: dbi-users Message-id: <9602201935.AA9091@iongate.staff.ichange.com> MIME-version: 1.0 Content-type: Text/Plain Content-transfer-encoding: 7BIT Hi, The problem documented below *also happens now* with the original test script, * test2.pl * !!! I get the same error about a statement handle, a hash, and a DESTROY ignored. Seems like it only happens with CREATE and INSERT statements. Any thoughts? Thanks. Simon Rakov ------------------------------------------------Original message follows------------------------------------------------- Every time I run my little discussion script, which is written in procedural perl (not object-oriented) I get this error, and frequently, a core dump: Statement handle DBI::st=HASH(0xa07c8) DESTROY ignored - never set up at discuss.t line 320. Database handle destroyed without explicit disconnect at discuss.t line 320. My script is called "discuss.t," and line 320 reads: $sth = $dbh->prepare( $query ); where $query is a scalar containing a valid SQL query. I copied this notation from the test2.pl script which came with my DBD distribution (DBD 0.60pl8, DBI 0.65, perl 5.001m, Solaris 2.4). You have doubtless concluded by now that I don't know what I am doing, and you'd be right. I just used the stuff in test2.pl as a cookbook, expecting that if I copied the statements for connecting to a database, preparing a query, executing the query, fetching or inserting a row, and disconnecting from the database, I would be all right. Well, that assumption seems to be wrong. Does anyone have any DOCUMENTATION for the DBI/DBD stuff? I'd really appreciate an answer to questions like "what is a statement handle? what does preparing a query mean?" Is there an FAQ out there? The funniest part of all this is that until a day or so ago, *the script worked properly* with exactly the same code to invoke the DBD. Any thoughts on what I've done wrong would be appreciated. Yours sincerely, Simon Rakov AT&T New Media Services ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <02613-5@oink>; Wed, 21 Feb 1996 07:07:45 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824849379:06296:1; Tue, 20 Feb 96 20:49:39 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa05760; 20 Feb 96 20:49 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id IAA07529 for dbi-users-real; Tue, 20 Feb 1996 08:21:57 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from zcias1.ziff.com (zcias1.ziff.com [140.244.1.69]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id IAA07523 for ; Tue, 20 Feb 1996 08:21:53 -0800 Received: from iongate.staff.ichange.com (198-112-128-9.ichange.com) by zcias1.ziff.com (PMDF V5.0-5 #10330) id <01I1FNIIKFXC003I3U@zcias1.ziff.com> for dbi-users@fugue.com; Tue, 20 Feb 1996 11:22:10 -0500 (EST) Received: by iongate.staff.ichange.com (IBM OS/2 SENDMAIL VERSION 1.3.2) /1.0) id AA8912; Tue, 20 Feb 1996 11:20:01 -0800 Received: from IChange with "Lotus Notes Mail Gateway for SMTP" id 16F19703E89DCDD6852562D600577A40; Tue, 20 Feb 1996 11:20:01 +0000 Date: Tue, 20 Feb 1996 11:09:48 -0400 (EDT) From: Simon Rakov Subject: DBD::MSQL gives messages about statement handles?!!?!?!! To: dbi-users Message-id: <9602201920.AA8912@iongate.staff.ichange.com> MIME-version: 1.0 Content-type: Text/Plain Content-transfer-encoding: 7BIT Hi, Every time I run my little discussion script, which is written in procedural perl (not object-oriented) I get this error, and frequently, a core dump: Statement handle DBI::st=HASH(0xa07c8) DESTROY ignored - never set up at discuss.t line 320. Database handle destroyed without explicit disconnect at discuss.t line 320. My script is called "discuss.t," and line 320 reads: $sth = $dbh->prepare( $query ); where $query is a scalar containing a valid SQL query. I copied this notation from the test2.pl script which came with my DBD distribution (DBD 0.60pl8, DBI 0.65, perl 5.001m, Solaris 2.4). You have doubtless concluded by now that I don't know what I am doing, and you'd be right. I just used the stuff in test2.pl as a cookbook, expecting that if I copied the statements for connecting to a database, preparing a query, executing the query, fetching or inserting a row, and disconnecting from the database, I would be all right. Well, that assumption seems to be wrong. Does anyone have any DOCUMENTATION for the DBI/DBD stuff? I'd really appreciate an answer to questions like "what is a statement handle? what does preparing a query mean?" Is there an FAQ out there? The funniest part of all this is that until a day or so ago, *the script worked properly* with exactly the same code to invoke the DBD. Any thoughts on what I've done wrong would be appreciated. Yours sincerely, Simon Rakov AT&T New Media Services ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <02613-14@oink>; Wed, 21 Feb 1996 07:09:40 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824865023:21765:1; Wed, 21 Feb 96 01:10:23 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa20992; 21 Feb 96 1:09 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id QAA09138 for dbi-users-real; Tue, 20 Feb 1996 16:01:27 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id QAA09134 for ; Tue, 20 Feb 1996 16:01:20 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ba24886; 20 Feb 96 22:36 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aj27923; 20 Feb 96 14:08 GMT Received: from toad by oink with SMTP (PP) id <27214-0@oink>; Tue, 20 Feb 1996 13:44:25 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA26063; Tue, 20 Feb 1996 13:44:16 +0000 Date: Tue, 20 Feb 1996 13:44:16 +0000 From: Tim Bunce Message-Id: <9602201344.AA26063@toad.ig.co.uk> To: dbi-users@fugue.com, petechen@math.rutgers.edu Subject: Re: MacPerl5 module for accessing Butler database Cc: mac-perl@iis.ee.ethz.ch, butler-sql@lists.stanford.edu X-Sun-Charset: US-ASCII content-length: 1243 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: petechen@math.rutgers.edu (Peter Chen) > > Hi, > I am in the processing of making a MacPerl5 module for accessing > the Butler database. Since this module currently is only useful on Macs, > and it won't contain any C interface to Perl, I am not quite sure what's > the preferred way of setting up something like this. Should I set it up in > a way similar to oraperl, or DBD::Oracle? > > You guys will have to excuse me if I don't have the full picture > about DBD/DBI, etc. I just got back onto this list today after a full year > of working on only Macs (not that I'm complaining, but sometimes I do miss > a Unix box, *sob*). To be honest, right now I would not recommend starting the development of a new DBD driver unless the need is urgent and you feel confortable with how to implement it. I'd suggest, instead, that you define a high level interface similar to the current DBI interface (connect, prepare, execute, fetch etc) and do wharever implementation is easiest for you 'behind' that. Once the ODBC DBI is usable you could think about migrating to an ODBC based driver. By that time tools will be available to simplify the task. Tim. p.s All the above presumes the 'Butler' database uses SQL. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <02614-36@oink>; Wed, 21 Feb 1996 07:13:41 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824871247:09867:1; Wed, 21 Feb 96 02:54:07 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa09748; 21 Feb 96 2:53 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa07673; 21 Feb 96 2:52 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id QAA09263 for dbi-users-real; Tue, 20 Feb 1996 16:41:56 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from ux4.cso.uiuc.edu (dswallow@ux4.cso.uiuc.edu [128.174.5.62]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id QAA09259 for ; Tue, 20 Feb 1996 16:41:53 -0800 Received: (from dswallow@localhost) by ux4.cso.uiuc.edu (8.6.12/8.6.12ui) id SAA17944 for dbi-users@fugue.com; Tue, 20 Feb 1996 18:45:29 -0600 Date: Tue, 20 Feb 1996 18:45:29 -0600 From: DAS Message-Id: <199602210045.SAA17944@ux4.cso.uiuc.edu> To: dbi-users@fugue.com Subject: annoying error message Content-Length: 127 Is there anyway to get rid of the destroyed without finish message which seems to haunt all DBI transactions? Thanks, Dave ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <02614-43@oink>; Wed, 21 Feb 1996 07:15:05 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824876605:29642:0; Wed, 21 Feb 96 04:23:25 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa29493; 21 Feb 96 4:22 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa21878; 21 Feb 96 4:21 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id TAA09760 for dbi-users-real; Tue, 20 Feb 1996 19:15:17 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id TAA09756 for ; Tue, 20 Feb 1996 19:14:51 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id cd29905; 20 Feb 96 23:52 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa27923; 20 Feb 96 14:06 GMT Received: from toad by oink with SMTP (PP) id <26594-0@oink>; Tue, 20 Feb 1996 10:53:46 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA25670; Tue, 20 Feb 1996 10:53:38 +0000 Date: Tue, 20 Feb 1996 10:53:38 +0000 From: Tim Bunce Message-Id: <9602201053.AA25670@toad.ig.co.uk> To: rick@berlin.myra.com Subject: Re: FYI: version check problem with perl5.002 Cc: dbi-users@fugue.com X-Sun-Charset: US-ASCII content-length: 1913 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: Rick Tessner > > Hello Tim. > > I've got perl 5.002gamma and was installing the DBI-0.65 when I ran across > the following problem: > > Test::Harness qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t/*.t > t/min...............DBI object version 0.65 does not match DBI.pm $VERSION > 0.65 at /opt/BETA/lib/perl5/DynaLoader.pm line 153. > FAILED tests 1-11 > > I've checked the archive and found the following msg re: 5.002 and module > version numbers: > > > > t/min...............DBI object version 0.65 does not match DBI.pm $VERSION > > 1.48 at /home/student9/dswallow/local/lib/perl5/DynaLoader.pm line 150. > > > > That's a problem, but easy to fix. Perl5.002 has a new module version > > checking mechanism that requires a consistent version number to be used. > > > > Anyone using the DBI and DBD::Oracle modules on Perl5.002 will need to > > edit the .pm files to make $VERSION = ... have the same value as VERSION > > in the Makefile.PL. > > > > I will release an updated DBI and DBD::Oracle for 5.002 as soon as I have > > time. Meanwhile the VERSION fix above should be all that's needed. > > In my case, you'll notice it says 0.65 does not equal 0.65. As it > turns out, it's "0.65" does not equal "0.65 ". > ^ > I grabbed DBI-0.65 from ftp.mcqueen.com and the DBI.pm had the $VERSION > number line as: > > $VERSION = substr(q$Revision: 0.65 $, 10); > > Removing the space so that the line reads as: > > $VERSION = substr(q$Revision: 0.65$, 10); > > resolved the problem. > > This may be indicative of a deeper problem in the version checking module > not removing whitespace prior to comparison. Just thought you might like > to be aware of this. The copy on ftp.mcqueen.com is out of date. It should be removed and replaced by a pointer to demon and the CPAN sites. We're up to DBI-0.67 now. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <02715-21@oink>; Wed, 21 Feb 1996 07:15:54 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824878147:04987:2; Wed, 21 Feb 96 04:49:07 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa04890; 21 Feb 96 4:48 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa26329; 21 Feb 96 4:47 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id SAA09632 for dbi-users-real; Tue, 20 Feb 1996 18:23:04 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-4.mail.demon.net ([158.152.1.108]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id SAA09628 for ; Tue, 20 Feb 1996 18:22:58 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-4.mail.demon.net id cg01493; 21 Feb 96 1:36 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id af27923; 20 Feb 96 14:06 GMT Received: from toad by oink with SMTP (PP) id <26895-0@oink>; Tue, 20 Feb 1996 12:28:58 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA25893; Tue, 20 Feb 1996 12:28:52 +0000 Date: Tue, 20 Feb 1996 12:28:52 +0000 From: Tim Bunce Message-Id: <9602201228.AA25893@toad.ig.co.uk> To: dbi-users@fugue.com Subject: Oracle PL/SQL function calls from DBI Cc: soul@presence.com X-Sun-Charset: US-ASCII content-length: 316 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 Forwarded to the dbi-users mailing list. ----- Begin Included Message ----- From: Tom Soulanille Sir, How might one invoke Oracle PL/SQL stored functions and receive their return value(s), through the agency of DBI? I've pawed around without success ... ----- End Included Message ----- ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <11306-2@oink>; Thu, 22 Feb 1996 07:07:25 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824930673:10435:0; Wed, 21 Feb 96 19:24:33 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa10234; 21 Feb 96 19:24 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa21465; 21 Feb 96 19:23 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA01555 for dbi-users-real; Wed, 21 Feb 1996 07:10:26 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from mailhost.lanl.gov (mailhost.lanl.gov [128.165.3.12]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id HAA01551 for ; Wed, 21 Feb 1996 07:10:21 -0800 Received: from [128.165.9.181] by mailhost.lanl.gov (8.6.12/1.2) id IAA04203; Wed, 21 Feb 1996 08:13:55 -0700 X-Sender: palmer@cst0.lanl.gov Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Wed, 21 Feb 1996 08:16:25 -0700 To: Peter Chen From: Byron Palmer Subject: Re: Butperl ready for beta test Cc: dbi-users@fugue.com, Hanz Makmur At 7:16 AM 2/21/96, Peter Chen wrote: >I am now looking for beta testers. >Any volunteer? I would like to try it out. I am using perl to do testing (via the web) as it is capable of handling the text answers and giving reasonable guesses as to correctness (don't you love english and what you can do with words, or to them). Anyway, I keep the results of these test in a Butler database but have to manually load them. I would love to do it automatically from perl and didn't want to put applescript in the perl to do it (too slow!). Thanks. ------------------------------------------------------------ Byron Palmer, Waste Management palmer@lanl.gov Technology Analysis MS-K484 , CST-3 Los Alamos, NM 87545 Computer Security (505)667-3528, Fax (505)665-0621 Computer Support ------------------------------------------------------------ ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <11306-4@oink>; Thu, 22 Feb 1996 07:07:34 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824932897:01409:0; Wed, 21 Feb 96 20:01:37 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa01109; 21 Feb 96 20:01 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id GAA01241 for dbi-users-real; Wed, 21 Feb 1996 06:12:27 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from solair1.inter.NL.net (solair1.inter.NL.net [193.78.240.13]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id GAA01237 for ; Wed, 21 Feb 1996 06:12:24 -0800 Received: from utr98-1.Utrecht.NL.net by solair1.inter.NL.net (5.65b/solair1.Inter.NL.net-1.31) id AA19544; Wed, 21 Feb 1996 15:15:50 +0100 X-Sender: pchen@solair1.inter.nl.net Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Wed, 21 Feb 1996 15:16:00 +0100 To: mac-perl@iis.ee.ethz.ch, butler-sql@lists.Stanford.EDU From: petechen@math.rutgers.edu (Peter Chen) Subject: Butperl ready for beta test Cc: dbi-users@fugue.com, makmur@cs.rutgers.edu (Hanz Makmur) I just completed a working version of Butperl (a module that enables MacPerl to access Butler database). I am now looking for beta testers. Any volunteer? If all goes well, I will put this on my home page, and make it publicly available. Enclosed is the README file. Peter Chen petechen@math.rutgers.edu ------ README for Butperl by Peter Chen, 2/21/96 I. What's Butperl? [Is it just me, or does this sound funny to you too. :-)] Butperl is a Perl5 module that enables perl scripts to access the Butler database. Currently, this only works on Macs. So this will only be useful with MacPerl. II. What's in the package? Butler.ph - Butperl perl header file with useful constants defined Butler.pm - Butperl module, package name "Butler". README - this file testpl.pl - simple example testing whether Butler.pm is 'require' friendly testpm.pl - simple example testing whether Butler.pm is 'use' friendly III. How do I install this? Simply put Butler.ph, Butler.pm, in a folder/directory that's in your perl library path. *Important* The XFCN file that's loaded by MacPerl to interface with Butler is not included in this distribution. I am still waiting for permission from Everyware to include this. For Butler owners who has the "Connection Goodies" disk: Open "EDC DAM Externals v1.0.3a" stack in the HyperCard folder with ResEdit Copy all XFCN and XCMD resources to a new file Save the file as "Butler.XFCN" Move the file into a folder in your perl library path. IV. How do I use this? Butler.pm provides you with the following functions, if you "use Butler'. &but_connect &but_disconnect &but_finish &but_prepare &but_execute &but_fetch &but_rollback &but_version &but_errno &but_errstr &but_do &but_lookup &but_login &but_mkdbstr &but_commit &but_dbsep If you 'require Butler.pm' instead, you will have to use 'Butler::connect', 'Butler::disconnect', etc instead. The arguments are documented in the source. The easiest way to start is use "testpm.pl as a template. V. Bugs and caveats The interface is modeled after DBD/DBI specification. A few known shortcomings: 1. Only one statement handle per session. There is no way to prepare multiple statements in one session. For one session, there is only one active statement. So in reality, the database handle and the statement handle are equivalent. At this point, the statement handles are not being used at all. 2. Error and status checking. Butler gives more error status information then simply an error number and an error string. Right now I combine all these information into &but_errno and &but_errstr. In the future, I plan to provide functions to give more detail error information. VI. Disclaimer 1. Use this at your own risk. This is a purely alpha/beta software. I made no guarantee of how well this will work for you. 2. No connection with Everyware. This package is provided without any connection/sponsorship from Everyware. The only connection if there is any, is that I have been a happy customer of Everyware for over a year. VII. Credit Many thanks to MacPerl-L, Butler-L, and DBI mailing lists, where lots of useful discussions took place. Special thank to Sergey Goldgaber , whose original posting on Butler-L inspired this module. Thanks to Jeff A. Shields and Douglas Getty from Everyware for their great technical/sales support. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <11306-10@oink>; Thu, 22 Feb 1996 07:08:29 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824934694:17868:1; Wed, 21 Feb 96 20:31:34 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa17568; 21 Feb 96 20:30 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa03128; 21 Feb 96 20:29 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA01773 for dbi-users-real; Wed, 21 Feb 1996 09:04:27 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from wc6.wl.aecl.ca (wc6.wl.aecl.ca [132.225.64.45]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id JAA01769 for ; Wed, 21 Feb 1996 09:04:17 -0800 Received: from DECNET-MAIL (OLIVERS@WP57) by wl.aecl.ca (PMDF V4.3-13 #8870) id <01I1H1CE8QXS8Y6FB6@wl.aecl.ca>; Wed, 21 Feb 1996 11:08:54 -0500 (CDT) Date: Wed, 21 Feb 1996 11:08:54 -0500 (CDT) From: "Steve Oliver (204) 753-2311 ext2771" Subject: unsubscribe To: dbi-users@fugue.com Message-id: <01I1H1CEACSY8Y6FB6@wl.aecl.ca> X-VMS-To: WL::IN%"dbi-users@fugue.com" MIME-version: 1.0 Content-type: TEXT/PLAIN; CHARSET=US-ASCII Content-transfer-encoding: 7BIT unsubscribe ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <11306-25@oink>; Thu, 22 Feb 1996 07:12:18 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824946840:08101:0; Wed, 21 Feb 96 23:54:00 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa07512; 21 Feb 96 23:52 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa09252; 21 Feb 96 23:52 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id OAA00951 for dbi-users-real; Wed, 21 Feb 1996 14:02:16 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from ward.nadn.navy.mil (ward.nadn.navy.mil [131.121.160.3]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id OAA00947 for ; Wed, 21 Feb 1996 14:02:12 -0800 Received: (from harle@localhost) by ward.nadn.navy.mil (8.6.12/8.6.12) id RAA08424; Wed, 21 Feb 1996 17:06:34 -0500 Date: Wed, 21 Feb 1996 17:06:34 -0500 (EST) From: Jim Harle X-Sender: harle@ward To: dbi-users@fugue.com cc: Tim.Bunce@ig.co.uk Subject: Problems building DBD Oracle on DG/UX Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII I resolved my earlier problems. I basically needed to clean out everything left over from earlier versions of perl5 and install perl5.002gamma. All went well making and installing DBI (0.67). In dealing with DBD::Oracle (0.28), the first problem I had was not finding DBIXS.h. I did what is scorned in README and hand edited the Makefile to add the correct path to DBIXS.h to INC. This allowed the make to complete successfully. The remaining problem is with make test. 2 of 5 tests fail. Here's the info, output from make test firest: 85 tiller> make test PERL_DL_NONLAZY=1 /usr/bin/perl -I./blib/arch/ -I./blib/lib/ -I/usr/local/lib/perl5/AViiON-dgux/5.002 -I/usr/local/lib/perl5 -e 'use Test::Harness qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t/*.t t/base..............install_driver(Oracle) failed: Can't load './blib/arch//auto/DBD/Oracle/Oracle.so' for module DBD::Oracle: dynamic linker: /usr/bin/perl: relocation error: symbol not found: setitimer at /usr/local/lib/perl5/DynaLoader.pm line 140. at blib/lib//DBD/Oracle.pm line 20 DBI::install_driver called at t/base.t line 16 FAILED tests 4-5 Failed 2/5 tests, 60.00% okay Test returned status 2 (wstat 512) t/main..............ok Failed 1 test script, 50.00% okay. 2/6 subtests failed, 66.67% okay. *** Error code 29 71 tiller> perl Makefile.PL Use of uninitialized value at Makefile.PL line 27. Configuring DBD::Oracle version ... Remember to actually read the README file! Using Oracle in /usr/oracle/product/7.2.2 Oracle sysliblist: /usr/oracle/product/7.2.2/lib/libgcc.a -lnsl_s Using /usr/oracle/product/7.2.2/proc/lib/proc.mk version 1.4 System: perl5.002 dgux tiller 5.4r3.10 generic aviion mc88110 AViiON-dgux dl_dlopen.xs Compiler: gcc -O2 -Dflock=dg_flock -I/usr/local/include -D_NO_PROTO Oracle proc.mk would have used these values but we override them: CC: cc CFLAGS: -I. LDFLAGS: -L$(LIBHOME) Checking if your kit is complete... Looks good Unrecognized argument in LIBS ignored: '/usr/oracle/product/7.2.2/lib/libgcc.a' Writing Makefile for DBD::Oracle 72 tiller> make umask 0 && cp Oraperl.pm ./blib/lib//Oraperl.pm umask 0 && cp oraperl.ph ./blib/lib//oraperl.ph umask 0 && cp Oracle.pm ./blib/lib//DBD/Oracle.pm /usr/bin/perl -I/usr/local/lib/perl5/AViiON-dgux/5.002 -I/usr/local/lib/perl5 /usr/local/lib/perl5/ExtUtils/xsubpp -typemap /usr/local/lib/perl5/ExtUtils/typemap Oracle.xs >Oracle.tc && mv Oracle.tc Oracle.c gcc -c -I/usr/oracle/product/7.2.2/rdbms/demo -I/usr/local/lib/perl5/AViiON-dgux/5.002/DBI -Dflock=dg_flock -I/usr/local/include -D_NO_PROTO -O2 -DVERSION=\"0.28\" -DXS_VERSION=\"0.28\" -fpic -I/usr/local/lib/perl5/AViiON-dgux/5.002/CORE/ -Wall -pedantic -Wno-comment -Wtraditional Oracle.c In file included from Oracle.c:19: Oracle.h:14: DBIXS.h: No such file or directory *** Error code 1 8 tiller> perl -V Summary of my perl5 (5.0 patchlevel 2) configuration: Platform: osname=dgux, osver=5.4r3.10, archname=AViiON-dgux uname='dgux tiller 5.4r3.10 generic aviion mc88110 ' hint=previous, useposix=true Compiler: cc='gcc', optimize='-O2', gccversion=2.5.8 cppflags='-Dflock=dg_flock -I/usr/local/include -D_NO_PROTO' ccflags ='-Dflock=dg_flock -I/usr/local/include -D_NO_PROTO' stdchar='unsigned char', d_stdstdio=define, usevfork=true voidflags=15, castflags=0, d_casti32=define, d_castneg=define intsize=4, alignbytes=8, usemymalloc=y, randbits=15 Linker and Libraries: ld='gcc', ldflags =' -L/usr/local/lib' libpth=/usr/local/lib /usr/sde/m88kdguxelf/usr/lib /lib /usr/lib libs=-ldgc -lnsl -ldbm -ldl -lld -lm -lc -lposix -lcrypt -lPW libc=/lib/libc.so, so=so Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun=, ccdlflags=' ' cccdlflags='-fpic', lddlflags='-shared -L/usr/local/lib' @INC: /usr/local/lib/perl5/AViiON-dgux/5.002 /usr/local/lib/perl5 /usr/local/lib/perl5/site_perl/AViiON-dgux /usr/local/lib/perl5/site_perl /usr/local/lib/perl5/AViiON-dgux . ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <11306-30@oink>; Thu, 22 Feb 1996 07:13:43 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824948686:22144:3; Thu, 22 Feb 96 00:24:46 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa22117; 22 Feb 96 0:24 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa15175; 22 Feb 96 0:22 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id MAA00827 for dbi-users-real; Wed, 21 Feb 1996 12:58:40 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from zu.zdk.com (ron@zu.zdk.com [199.183.114.2]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id MAA00823 for ; Wed, 21 Feb 1996 12:58:37 -0800 Received: (from ron@localhost) by zu.zdk.com (8.6.9/8.6.9) id QAA11563; Wed, 21 Feb 1996 16:02:18 -0500 From: Ron Schmidt Message-Id: <199602212102.QAA11563@zu.zdk.com> Subject: persistant connect/login handles To: dbi-users@fugue.com Date: Wed, 21 Feb 1996 16:02:15 -0500 (EST) Cc: ron@zedak.com X-Mailer: ELM [version 2.4 PL23] Content-Type: text Content-Length: 841 We are currently using perl and DBI/Oraperl cgi scripts to allow users to login and use their login name as a key to retrieve information about themselves from a database. We have observed that on our Integrix (Sun clone) running Solaris 2.4 we can make and break about 4 connections using &ora_login per second. We believe that this means that the &ora_login comprises a significant portion of the cost of generating each web page that requires database access. Has any thought been given to allowing a default persistant connection id that could be used accross cgi-requests for the coming DBI spec? There appears to be a capability like this in the Sybase websql package. I realize that websql is more than just a Perl module and that this may be complicated but decided it could not hurt terribly to ask. -Ron Schmidt Zedak Corp ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <11307-35@oink>; Thu, 22 Feb 1996 07:14:30 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824957398:28054:3; Thu, 22 Feb 96 02:49:58 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa27738; 22 Feb 96 2:49 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id RAA01382 for dbi-users-real; Wed, 21 Feb 1996 17:50:08 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id RAA01378 for ; Wed, 21 Feb 1996 17:50:06 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ae21779; 21 Feb 96 23:46 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ac17117; 21 Feb 96 11:05 GMT Received: from toad by oink with SMTP (PP) id <05935-0@oink>; Wed, 21 Feb 1996 10:12:24 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA29442; Wed, 21 Feb 1996 10:12:15 +0000 Date: Wed, 21 Feb 1996 10:12:15 +0000 From: Tim Bunce Message-Id: <9602211012.AA29442@toad.ig.co.uk> To: dbi-users@fugue.com, dswallow@students.uiuc.edu Subject: Re: annoying error message X-Sun-Charset: US-ASCII content-length: 185 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: DAS > > Is there anyway to get rid of the destroyed without finish message which > seems to haunt all DBI transactions? Yes, call finish. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <11306-35@oink>; Thu, 22 Feb 1996 07:14:56 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824953393:23264:1; Thu, 22 Feb 96 01:43:13 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa23014; 22 Feb 96 1:42 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id PAA01092 for dbi-users-real; Wed, 21 Feb 1996 15:28:41 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from fruitbat.mcqueen.com (pillshovel.mcqueen.com [194.72.106.246]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id PAA01088 for ; Wed, 21 Feb 1996 15:28:35 -0800 Received: (from descarte@localhost) by fruitbat.mcqueen.com (8.6.12/8.6.12) id XAA29346 for dbi-users@fugue.com; Wed, 21 Feb 1996 23:26:16 GMT From: Alligator Descartes Message-Id: <199602212326.XAA29346@fruitbat.mcqueen.com> Subject: ANNOUNCE ( Of sorts ): DBD-Informix-0.20pl1 To: dbi-users@fugue.com Date: Wed, 21 Feb 1996 23:26:15 +0000 (GMT) X-Pants: ** The return address of this email should be: descarte@hermetica.com X-Mailer: ELM [version 2.4 PL24] MIME-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 933 A quick note to announce the impending release of DBD-Informix-0.20pl1, which is the second go at the Informix driver. This note applies to *everyone* that's downloaded the driver. PLEASE email me and let me know any thoughts you have on it so's I know roughly which way to push it. If you don't say anything, don't moan when doesn't get fixed/implemented. To warn off topics already covered, here's what's been altered: o Makefile.PL is slightly smarter. It will build ( theoretically ) for versions 5, 6 and 7 no trouble o CREATE & pals are supported now o make process cleaned drmatically o test script completely overhauled o Error number/message fixed. Errors now appear in $DBI::errnum and $DBI::errstr Regards. -- Alligator Descartes | "...Nil posse creari De nilo" descarte@hermetica.com | -- Lucretius, De Rerum Natura I, l.155 http://www.hermetica.com/descarte | ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <15029-15@oink>; Thu, 22 Feb 1996 11:42:27 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824988211:09953:1; Thu, 22 Feb 96 11:23:31 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa09830; 22 Feb 96 11:23 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id CAA02155 for dbi-users-real; Thu, 22 Feb 1996 02:00:00 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from chsun.eunet.ch (chsun.eunet.ch [146.228.10.15]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id BAA02151 for ; Thu, 22 Feb 1996 01:59:57 -0800 Received: from itf1.UUCP by chsun.eunet.ch (8.6.10/1.34) id LAA19801; Thu, 22 Feb 1996 11:03:24 +0100 Received: from kiruna.itf.ch by itf.ch (4.1/SMI-4.1) id AA10927; Thu, 22 Feb 96 09:06:58 +0100 Date: Thu, 22 Feb 96 09:06:58 +0100 From: mpeppler@itf.CH (Michael Peppler) Message-Id: <9602220806.AA10927@itf.ch> To: ron@zedak.com Subject: Re: persistant connect/login handles Cc: dbi-users@fugue.com > From: Ron Schmidt > > We are currently using perl and DBI/Oraperl cgi scripts to allow users > to login and use their login name as a key to retrieve information > about themselves from a database. We have observed that on our > Integrix (Sun clone) running Solaris 2.4 we can make and break about > 4 connections using &ora_login per second. We believe that this means > that the &ora_login comprises a significant portion of the cost > of generating each web page that requires database access. Has any > thought been given to allowing a default persistant connection id > that could be used accross cgi-requests for the coming DBI spec? > There appears to be a capability like this in the Sybase > websql package. web.sql uses the Netscape API (NSAPI) to load itself into the http server. That's the technique they have found to keep connections open across requests. I haven't much looked at the different CGI modules but could the Minisrv module be used for something like this? (If it could I'd be interested for Sybperl as well...) Michael ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <16455-0@oink>; Thu, 22 Feb 1996 14:15:47 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 824997856:16244:2; Thu, 22 Feb 96 14:04:16 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa16091; 22 Feb 96 14:03 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id EAA02358 for dbi-users-real; Thu, 22 Feb 1996 04:31:09 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from solair1.inter.NL.net (solair1.inter.NL.net [193.78.240.13]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id EAA02354 for ; Thu, 22 Feb 1996 04:31:05 -0800 Received: from utr99-165.Utrecht.NL.net by solair1.inter.NL.net (5.65b/solair1.Inter.NL.net-1.31) id AA18607; Thu, 22 Feb 1996 13:34:07 +0100 X-Sender: pchen@solair1.inter.nl.net Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Thu, 22 Feb 1996 13:34:21 +0100 To: mac-perl@iis.ee.ethz.ch, butler-sql@lists.Stanford.EDU From: petechen@math.rutgers.edu (Peter Chen) Subject: beta Butperl to be released via web Cc: dbi-users@fugue.com Due to a large number of enthusiastic responses, instead of replying and sending the package out individually, I'm setting up a Butperl home page, so you guys can download this. Stay tuned. The URL will be announced in a day or 2. I have just received permission from Don J. Reith , the Butler product manager to distribute the XFCN's, with the condition that the appropriate copyright notices be included in the README and other related docs. So this beta distribution will include "Butler.XFCN". Kudos to Everyware for their great support of their developers. Incidentally, some folks have asked why it's so named. I didn't give it much thought at first. It's named in the spirit of Oraperl (Oracle), Sybperl (Sybase), and Interperl (Interbase). So Butperl is for Butler, no? I must admit that later on when I reread my original posting, I couldn't help but laugh at how some of the names sound: module name: Butperl some functions: &but_connect &but_disconnect &but_finish &but_prepare &but_execute &but_fetch &but_rollback &but_lookup &but_login &but_commit I am open to suggestions for a more appropriate name, if people so desire. I guess now I am a *but_head*. (for perl5 literates, *but_head = \&petechen) :-) Peter Chen petechen@math.rutgers.edu ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <16468-1@oink>; Thu, 22 Feb 1996 14:16:28 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 824998019:01114:0; Thu, 22 Feb 96 14:06:59 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa00649; 22 Feb 96 14:06 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id FAA02397 for dbi-users-real; Thu, 22 Feb 1996 05:07:05 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id FAA02393 for ; Thu, 22 Feb 1996 05:06:59 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id at05145; 22 Feb 96 13:09 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ak07770; 22 Feb 96 13:01 GMT Received: from toad by oink with SMTP (PP) id <15658-0@oink>; Thu, 22 Feb 1996 12:28:23 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA02976; Thu, 22 Feb 1996 12:28:15 +0000 Date: Thu, 22 Feb 1996 12:28:15 +0000 From: Tim Bunce Message-Id: <9602221228.AA02976@toad.ig.co.uk> To: mac-perl@iis.ee.ethz.ch, butler-sql@lists.stanford.edu, petechen@math.rutgers.edu Subject: Re: Butperl ready for beta test Cc: dbi-users@fugue.com, makmur@cs.rutgers.edu X-Sun-Charset: US-ASCII content-length: 805 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > To: mac-perl@iis.ee.ethz.ch, butler-sql@lists.Stanford.EDU Can't reply to ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^ > From: petechen@math.rutgers.edu (Peter Chen) > > I. What's Butperl? [Is it just me, or does this sound funny to you too. :-)] > > Butperl is a Perl5 module that enables perl scripts to access the Butler > database. Currently, this only works on Macs. So this will only be > useful with MacPerl. We gave up calling things perl once we had extensions. It should be referred to as 'the Butler module'. > IV. How do I use this? > > Butler.pm provides you with the following functions, if you "use Butler'. > > &but_connect > ... > > V. Bugs and caveats > > The interface is modeled after DBD/DBI specification. Only *very* loosly it would seem! Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <17881-0@oink>; Thu, 22 Feb 1996 17:35:45 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825010506:14637:0; Thu, 22 Feb 96 17:35:06 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa14119; 22 Feb 96 17:34 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA02643 for dbi-users-real; Thu, 22 Feb 1996 07:23:18 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from fruitbat.mcqueen.com (pillshovel.mcqueen.com [194.72.106.246]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id HAA02639 for ; Thu, 22 Feb 1996 07:23:13 -0800 Received: (from descarte@localhost) by fruitbat.mcqueen.com (8.6.12/8.6.12) id PAA06737; Thu, 22 Feb 1996 15:20:48 GMT From: Alligator Descartes Message-Id: <199602221520.PAA06737@fruitbat.mcqueen.com> Subject: Re: ANNOUNCE ( Of sorts ): DBD-Informix-0.20pl1 To: Tim.Bunce@ig.co.uk (Tim Bunce) Date: Thu, 22 Feb 1996 15:20:47 +0000 (GMT) Cc: dbi-users@fugue.com, k@anna.mind.de In-Reply-To: <9602221033.AA02771@toad.ig.co.uk> from "Tim Bunce" at Feb 22, 96 10:33:30 am X-Pants: ** The return address of this email should be: descarte@hermetica.com X-Mailer: ELM [version 2.4 PL24] MIME-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 553 > > A quick note to announce the impending release of DBD-Informix-0.20pl1, > > which is the second go at the Informix driver. > > Does it have an 'isqlperl' compatibility layer? Nope, but consider it on the 'Todo' list now. Which also makes me think an Msqlperl emulation layer for DBD::mSQL would be a good plan. I've cc:d this to Andreas in case he fancies doing it! 8-) > Tim. -- Alligator Descartes | "...Nil posse creari De nilo" descarte@hermetica.com | -- Lucretius, De Rerum Natura I, l.155 http://www.hermetica.com/descarte | ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <17974-0@oink>; Thu, 22 Feb 1996 17:42:03 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825010828:13174:1; Thu, 22 Feb 96 17:40:28 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa12893; 22 Feb 96 17:39 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA02652 for dbi-users-real; Thu, 22 Feb 1996 07:27:23 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from fruitbat.mcqueen.com (pillshovel.mcqueen.com [194.72.106.246]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id HAA02648 for ; Thu, 22 Feb 1996 07:27:20 -0800 Received: (from descarte@localhost) by fruitbat.mcqueen.com (8.6.12/8.6.12) id PAA06802; Thu, 22 Feb 1996 15:25:10 GMT From: Alligator Descartes Message-Id: <199602221525.PAA06802@fruitbat.mcqueen.com> Subject: Re: Informix DBD for Perl5 on hpux To: tgp@surfin.com (Tony G. Peterman) Date: Thu, 22 Feb 1996 15:25:09 +0000 (GMT) Cc: dbi-users@fugue.com In-Reply-To: <199602221529.JAA21959@surfin.com> from "Tony G. Peterman" at Feb 22, 96 09:29:11 am X-Pants: ** The return address of this email should be: descarte@hermetica.com X-Mailer: ELM [version 2.4 PL24] MIME-Version: 1.0 Content-Type: text/plain; charset=US-ASCII Content-Transfer-Encoding: 7bit Content-Length: 730 > After these changes I was able to build, and run the test.pl without error. I > have ran test against tables that contain no blob data and they work fine. > Test against tables with blob data do not work, I am planning on doing some more > investigation into this problem. Hm, BLOBs haven't been dealt with yet. Now on the Todo list for the next release. > I also noticed that if a column name was mispelled a select would hang. Now, that's definitely a bug! I'll look into it when I'm working on it. > Hope this helps someone, Plenty. Ta much. > Tony -- Alligator Descartes | "...Nil posse creari De nilo" descarte@hermetica.com | -- Lucretius, De Rerum Natura I, l.155 http://www.hermetica.com/descarte | ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <18697-0@oink>; Thu, 22 Feb 1996 19:06:04 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825015720:01792:0; Thu, 22 Feb 96 19:02:00 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa01162; 22 Feb 96 19:01 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id GAA02548 for dbi-users-real; Thu, 22 Feb 1996 06:41:39 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id GAA02544 for ; Thu, 22 Feb 1996 06:41:27 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ae04766; 22 Feb 96 13:02 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ab07770; 22 Feb 96 13:01 GMT Received: from toad by oink with SMTP (PP) id <14805-0@oink>; Thu, 22 Feb 1996 10:30:59 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA02766; Thu, 22 Feb 1996 10:30:51 +0000 Date: Thu, 22 Feb 1996 10:30:51 +0000 From: Tim Bunce Message-Id: <9602221030.AA02766@toad.ig.co.uk> To: dbi-users@fugue.com, ron@zedak.com Subject: Re: persistant connect/login handles X-Sun-Charset: US-ASCII content-length: 945 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: Ron Schmidt > > We are currently using perl and DBI/Oraperl cgi scripts to allow users > to login and use their login name as a key to retrieve information > about themselves from a database. We have observed that on our > Integrix (Sun clone) running Solaris 2.4 we can make and break about > 4 connections using &ora_login per second. We believe that this means > that the &ora_login comprises a significant portion of the cost > of generating each web page that requires database access. Has any > thought been given to allowing a default persistant connection id > that could be used accross cgi-requests for the coming DBI spec? > There appears to be a capability like this in the Sybase > websql package. I realize that websql is more than just a > Perl module and that this may be complicated but decided > it could not hurt terribly to ask. This question is best asked in the cgi usenet newsgroup. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <24245-20@oink>; Fri, 23 Feb 1996 10:54:08 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825070389:01745:0; Fri, 23 Feb 96 10:13:09 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa01163; 23 Feb 96 10:11 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id BAA02907 for dbi-dev-real; Fri, 23 Feb 1996 01:34:10 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from email.univie.ac.at (email.univie.ac.at [131.130.1.19]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id BAA02903 for ; Fri, 23 Feb 1996 01:34:08 -0800 From: johannes@zditf2.arcs.ac.at Received: from zditf2.arcs.ac.at by email.univie.ac.at with SMTP (PP); Fri, 23 Feb 1996 10:37:15 +0100 Received: by zditf2.arcs.ac.at; id AA24944; Fri, 23 Feb 1996 10:37:04 +0100 Message-Id: <9602230937.AA24944@zditf2.arcs.ac.at> To: dbi-dev@fugue.com Subject: DIGITAL (Oracle) - RDB Date: Fri, 23 Feb 96 10:37:04 +0100 X-Mts: smtp Hallo all, i am new to this list and have interest on an DIGITAL (Oracle) - RDB Database Drivers. Is anyone working on this? -- Johannes Karanitsch email: johannes@zditf2.arcs.ac.at Austrian Research Centre Seibersdorf URL: http://zditr1.arcs.ac.at/~johannes Dept. IT phone: +43 2254 780-3173 A-2444 Seibersdorf fax: +43 2254 72133 ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <25591-13@oink>; Fri, 23 Feb 1996 16:38:37 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825084581:28185:1; Fri, 23 Feb 96 14:09:41 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa27940; 23 Feb 96 14:09 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id EAA03176 for dbi-users-real; Fri, 23 Feb 1996 04:48:21 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from styx.cursci.co.uk (charon.cursci.co.uk [194.129.118.1]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id EAA03172 for ; Fri, 23 Feb 1996 04:48:14 -0800 Received: from gateway.cursci.co.uk (gateway.cursci.co.uk [193.112.129.238]) by styx.cursci.co.uk (8.7.3/8.7.3/ep (2.1)) with SMTP id MAA22935 for ; Fri, 23 Feb 1996 12:51:39 GMT Message-Id: <199602231251.MAA22935@styx.cursci.co.uk> Date: Fri, 23 Feb 1996 14:00:00 +0000 From: Mark Lester Subject: long fields & stored procs To: DBI List X-Mailer: Worldtalk (NetConnex V3.50c)/MIME I ended up using the Oraperl interface in DBI to do this. You just set $Oracle::ora_long = ; This sets up the oraperl long buffer accordingly. You will need to have another field in your table to determine how long the particular long field is, so you can set the buffer. I dunno what happens with binary data in a long field, hopefully the scalar value gets initialized and you use unpack to interpret it. I would still like to know how to use Tim Bunces interface to Oracle. The 'get data back from stored procedures is done by populating a temp table, and then doing a subsequent query on that. This still means a bit too much going on on the perl side for my liking, but it works. Mark Lester (EP) ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <26577-0@oink>; Fri, 23 Feb 1996 17:01:10 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825094752:02838:0; Fri, 23 Feb 96 16:59:12 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa01954; 23 Feb 96 16:57 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA03406 for dbi-users-real; Fri, 23 Feb 1996 07:38:00 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from ux4.cso.uiuc.edu (dswallow@ux4.cso.uiuc.edu [128.174.5.62]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id HAA03402 for ; Fri, 23 Feb 1996 07:37:59 -0800 Received: (from dswallow@localhost) by ux4.cso.uiuc.edu (8.6.12/8.6.12ui) id JAA27255 for dbi-users@fugue.com; Fri, 23 Feb 1996 09:41:52 -0600 Date: Fri, 23 Feb 1996 09:41:52 -0600 From: DAS Message-Id: <199602231541.JAA27255@ux4.cso.uiuc.edu> To: dbi-users@fugue.com Subject: Oracle interface Content-Length: 478 Hello, I just got the DBD Oracle driver working with my system. I realized that the interface functions are not the same as DBD Informix or DBD mSQL. I was under the impression that the latter two formed some type of standard. Will I have to write wrappers for the DBD Oracle just so I can call it in the same fashion? I only need the simple subset of SQL commands (just like mSQL), so it wouldn't be that bad a task. I am just wondering if it is necessary. Thanks, Dave ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <05416-7@oink>; Mon, 26 Feb 1996 07:12:08 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825137166:13872:1; Sat, 24 Feb 96 04:46:06 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa13073; 24 Feb 96 4:43 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id TAA00391 for dbi-users-real; Fri, 23 Feb 1996 19:37:13 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from netcomsv.netcom.com (uucp6.netcom.com [163.179.3.6]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id TAA00387 for ; Fri, 23 Feb 1996 19:37:11 -0800 Received: by netcomsv.netcom.com with UUCP (8.6.12/SMI-4.1) id TAA17584; Fri, 23 Feb 1996 19:32:04 -0800 Received: from greedo.vivid.com by vivid.com (NX5.67c/NeXT-2.0) id AA06257; Fri, 23 Feb 96 19:19:25 -0800 Date: Fri, 23 Feb 96 19:19:25 -0800 X-Sender: jake@vivid.vivid.com Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" To: dbi-users@fugue.com From: jake@vivid.com (Jake Donham) Subject: Oraperl doesn't return undef on error inside of eval I'm trying to use the eval/die exception-handling mechanism in Perl 5 with Oraperl. However, if there's an error in the prepare part of the call, Oraperl doesn't seem to return an undef value. Without the eval/die stuff I get the expected undef and error message. Here's an example (with raw DBI calls): #!/usr/bin/perl use DBI; eval { $dbh = DBI->connect('', 'username', 'password', 'Oracle') || die "connect"; $cursor = $dbh->prepare("select TABLE_NAME from USER_TABLES") || die "prepare"; $cursor->execute || die "execute"; while (@row = $cursor->fetchrow) { print join(' ', @row), "\n"; } }; if ($@) { die "caught exception---$@"; } If you mess up the connect, you get the 'caught exception' bit; if you mess up the prepare you get nothing (except a DESTROY warning). But take off the eval wrapper and it works fine. Anybody know what's up? Thanks, Jake ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <13143-0@oink>; Mon, 26 Feb 1996 17:21:07 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825354971:05097:0; Mon, 26 Feb 96 17:16:11 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa04305; 26 Feb 96 17:15 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA01676 for dbi-users-real; Mon, 26 Feb 1996 07:09:46 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id HAA01672 for ; Mon, 26 Feb 1996 07:09:44 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ab12328; 26 Feb 96 14:41 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa27170; 26 Feb 96 14:40 GMT Received: from toad by oink with SMTP (PP) id <11110-0@oink>; Mon, 26 Feb 1996 13:16:32 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA11898; Mon, 26 Feb 1996 13:16:25 +0000 Date: Mon, 26 Feb 1996 13:16:25 +0000 From: Tim Bunce Message-Id: <9602261316.AA11898@toad.ig.co.uk> To: dbi-users@fugue.com, jake@vivid.com Subject: Re: Oraperl doesn't return undef on error inside of eval X-Sun-Charset: US-ASCII content-length: 1214 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: jake@vivid.com (Jake Donham) > > I'm trying to use the eval/die exception-handling mechanism in Perl 5 with > Oraperl. However, if there's an error in the prepare part of the call, > Oraperl doesn't seem to return an undef value. Without the eval/die stuff I > get the expected undef and error message. > > Here's an example (with raw DBI calls): > > $cursor = $dbh->prepare("select TABLE_NAME from USER_TABLES") > || die "prepare"; > > If you mess up the connect, you get the 'caught exception' bit; if you mess > up the prepare you get nothing (except a DESTROY warning). > > But take off the eval wrapper and it works fine. Anybody know what's up? Off-hand, no. Oracle.pm says: DBD::Oracle::st::_prepare($sth, $statement, @attribs) or return undef; Oracle.xs says: void _prepare(sth, statement, attribs=Nullsv) SV * sth char * statement SV * attribs CODE: DBD_ATTRIBS_CHECK("_prepare", sth, attribs); ST(0) = dbd_st_prepare(sth, statement, attribs) ? &sv_yes : &sv_no; and dbd_st_prepare in dbdimp.c has return 0 in all the right places. Not much chance of that going wrong. What does $dbh->debug(2) show? Tim. ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <15735-0@oink>; Tue, 27 Feb 1996 07:07:21 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825360958:06966:0; Mon, 26 Feb 96 18:55:58 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa05837; 26 Feb 96 18:55 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA01922 for dbi-users-real; Mon, 26 Feb 1996 09:08:19 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from deimos (deimos.sovam.com [194.67.1.156]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id JAA01918 for ; Mon, 26 Feb 1996 09:08:06 -0800 Received: from chronos ([194.67.3.135]) by deimos.sovam.com with ESMTP id <260558-21922>; Mon, 26 Feb 1996 20:11:42 +0300 Date: Mon, 26 Feb 1996 20:11:37 +0300 (MSK) From: Roman Podshivalov Reply-To: Roman Podshivalov Subject: Re: ora_login trough SQL*Net failed ?! To: Tim Bunce cc: dbi-users@fugue.com In-Reply-To: <9602161218.AA06434@toad.ig.co.uk> Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; LANGUAGE=russian > $ TWO_TASK=foo; export TWO_TASK > > $ sqlplus scott/tiger > > $ perl test.pl > > where test.pl is > > use Oraperl; > ora_login('', 'scott/tiger', '') or die $ora_errno; > print "ok\n"; > Results: romas@chronos ~/oraperl $ export TWO_TASK=T:mars:SVM romas@chronos ~/oraperl $ sqlplus scott/tiger SQL*Plus: Release 3.2.2.0.0 - Production on Mon Feb 26 20:08:48 1996 Copyright (c) Oracle Corporation 1979, 1994. All rights reserved. Connected to: Oracle7 Server Release 7.2.2.4.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.2.2.3.0 - Production SQL> exit Disconnected from Oracle7 Server Release 7.2.2.4.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.2.2.3.0 - Production romas@chronos ~/oraperl $ ./test.pl ORA-06401: NETCMN: invalid driver designator (DBD: login failed) at ./test.pl line 5. romas@chronos ~/oraperl $ export TWO_TASK=TEST romas@chronos ~/oraperl $ sqlplus scott/tiger SQL*Plus: Release 3.2.2.0.0 - Production on Mon Feb 26 20:09:10 1996 Copyright (c) Oracle Corporation 1979, 1994. All rights reserved. Connected to: Oracle7 Server Release 7.2.2.4.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.2.2.3.0 - Production SQL> exit Disconnected from Oracle7 Server Release 7.2.2.4.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.2.2.3.0 - Production romas@chronos ~/oraperl $ ./test.pl ORA-12203: TNS:unable to connect to destination (DBD: login failed) at ./test.pl line 5. romas@chronos ~/oraperl $ cat test.pl #!/usr/local/bin/perl # eval 'use Oraperl; 1' || die $@ if $] >= 5; $lda = &ora_login('', 'scott/tiger', '') || die $ora_errstr; print "ok\n"; &ora_logoff($lda) || die $ora_errstr; hehe, any suggestion ??? ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <15734-13@oink>; Tue, 27 Feb 1996 07:10:18 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825365633:06155:1; Mon, 26 Feb 96 20:13:53 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa05867; 26 Feb 96 20:13 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa04099; 26 Feb 96 20:12 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id KAA02064 for dbi-users-real; Mon, 26 Feb 1996 10:22:54 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from voyager.datatools.com (datatools.com [192.216.89.5]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id KAA02060 for ; Mon, 26 Feb 1996 10:22:53 -0800 Received: from rose.datatools.com by voyager.datatools.com (4.1/4.7); Mon, 26 Feb 96 10:23:26 PST Date: Mon, 26 Feb 1996 10:24:08 -0800 (PST) From: Jim Wiese To: Roman Podshivalov Cc: Tim Bunce , dbi-users@fugue.com Subject: Re: ora_login trough SQL*Net failed ?! In-Reply-To: Message-Id: Mime-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII On Mon, 26 Feb 1996, Roman Podshivalov wrote: > Date: Mon, 26 Feb 1996 20:11:37 +0300 (MSK) > From: Roman Podshivalov > To: Tim Bunce > Cc: dbi-users@fugue.com > Subject: Re: ora_login trough SQL*Net failed ?! > > > $ TWO_TASK=foo; export TWO_TASK > > > > $ sqlplus scott/tiger > > > > $ perl test.pl > > > > where test.pl is > > > > use Oraperl; > > ora_login('', 'scott/tiger', '') or die $ora_errno; > > print "ok\n"; > > > Results: > romas@chronos ~/oraperl $ export TWO_TASK=T:mars:SVM > romas@chronos ~/oraperl $ sqlplus scott/tiger > > SQL*Plus: Release 3.2.2.0.0 - Production on Mon Feb 26 20:08:48 1996 > > Copyright (c) Oracle Corporation 1979, 1994. All rights reserved. > > > Connected to: > Oracle7 Server Release 7.2.2.4.0 - Production Release > With the distributed, replication and parallel query options > PL/SQL Release 2.2.2.3.0 - Production > > SQL> exit > Disconnected from Oracle7 Server Release 7.2.2.4.0 - Production Release > With the distributed, replication and parallel query options > PL/SQL Release 2.2.2.3.0 - Production > romas@chronos ~/oraperl $ ./test.pl > ORA-06401: NETCMN: invalid driver designator (DBD: login failed) at ./test.pl > line 5. > romas@chronos ~/oraperl $ export TWO_TASK=TEST > romas@chronos ~/oraperl $ sqlplus scott/tiger > > SQL*Plus: Release 3.2.2.0.0 - Production on Mon Feb 26 20:09:10 1996 > > Copyright (c) Oracle Corporation 1979, 1994. All rights reserved. > > > Connected to: > Oracle7 Server Release 7.2.2.4.0 - Production Release > With the distributed, replication and parallel query options > PL/SQL Release 2.2.2.3.0 - Production > > SQL> exit > Disconnected from Oracle7 Server Release 7.2.2.4.0 - Production Release > With the distributed, replication and parallel query options > PL/SQL Release 2.2.2.3.0 - Production > romas@chronos ~/oraperl $ ./test.pl > ORA-12203: TNS:unable to connect to destination (DBD: login failed) at > ./test.pl line 5. > romas@chronos ~/oraperl $ cat test.pl > #!/usr/local/bin/perl > # > eval 'use Oraperl; 1' || die $@ if $] >= 5; > > $lda = &ora_login('', 'scott/tiger', '') || die $ora_errstr; > > print "ok\n"; > > &ora_logoff($lda) || die $ora_errstr; > > hehe, any suggestion ??? > > Please correct me if I'm wrong, but when you have line : > #!/usr/local/bin/perl You are starting a new shell, and therefore your "TWO_TASK" environment variable won't be set. Just a thought .... -Jim ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <15735-15@oink>; Tue, 27 Feb 1996 07:10:35 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825374733:13534:0; Mon, 26 Feb 96 22:45:33 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa13378; 26 Feb 96 22:45 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id KAA02114 for dbi-users-real; Mon, 26 Feb 1996 10:35:11 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from solair1.inter.NL.net (solair1.inter.NL.net [193.78.240.13]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id KAA02110 for ; Mon, 26 Feb 1996 10:35:08 -0800 Received: from utr98-4.Utrecht.NL.net by solair1.inter.NL.net (5.65b/solair1.Inter.NL.net-1.31) id AA00546; Mon, 26 Feb 1996 18:59:21 +0100 X-Sender: pchen@solair1.inter.nl.net Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Mon, 26 Feb 1996 18:59:28 +0100 To: mac-perl@iis.ee.ethz.ch, butler-sql@lists.Stanford.EDU From: petechen@math.rutgers.edu (Peter Chen) Subject: Butler module released Cc: dbi-users@fugue.com Butler Module for Perl has been released. I have set up a Butler Module home page where you can download the package. In case you don't know what Butler Module is, enclosed is the README file. I apologize for the lack of anonymous ftp service. I haven't quite got the chance to get in touch with the local sysadmin to set this up. Peter Chen petechen@math.rutgers.edu ----- README for Perl Butler Module by Peter Chen , 2/21/96 Last updated 2/26/96 I. What's Butler Module? Butler module is a Perl5 module that enables perl scripts to access the Butler SQL database. Currently, this only works on Macs. So this will only be useful with MacPerl. II. What's in the package? Butler.ph - Butperl perl header file with useful constants defined Butler.pm - Butperl module, package name "Butler". Butler.XFCN - Everyware's DAM Externals README - this file testpl.pl - simple example testing whether Butler.pm is 'require' friendly testpm.pl - simple example testing whether Butler.pm is 'use' friendly III. How do I install this? Simply put Butler.ph, Butler.pm, and Butler.XFCN in a folder/directory that's in your perl library path. I recommend adding a "local lib" into your MacPerl library path, and put the files in the "local lib" folder instead. This makes it easier to differentiate them from the files distributed with the standard library. IV. How do I use this? Butler.pm provides you with the following functions, if you "use Butler', &btlr_connect &btlr_disconnect &btlr_finish &btlr_prepare &btlr_execute &btlr_fetch &btlr_rollback &btlr_version &btlr_clnt_errno &btlr_errno &btlr_errno2 &btlr_errstr &btlr_rv &btlr_do &btlr_lookup &btlr_login &btlr_mkdbstr &btlr_commit &btlr_dbsep If you 'require Butler.pm' instead, you will have to use '&Butler::connect', '&Butler::disconnect', etc instead. The arguments are documented in the source. The easiest way to start is use "testpm.pl as a template. V. Bugs and caveats The interface is modeled after DBD/DBI specification (loosely, as Tim Bunce pointed out). A few known shortcomings: 1. Only one statement handle per session. There is no way to prepare multiple statements in one session. For one session, there is only one active statement. So in reality, the database handle and the statement handle are equivalent. You can use them interchangeably. The session switching part has not been tested rigorously though. VI. Disclaimer/Legalism 1. Use this at your own risk. This is a purely alpha/beta software. I made no guarantee of how well this will work for you. 2. No connection with Everyware. This package is provided without any connection/sponsorship from Everyware. The only connection if there is any, is that I have been a happy customer of Everyware for over a year. 3. Butler.XFCN included in this distribution is copyrighted 1994 Everyware Development. VII. Credit Many thanks to MacPerl-L, Butler-L, and DBI mailing lists, where many useful discussions took place. Special thank to Sergey Goldgaber , whose original posting on Butler-L inspired this module. Thanks to Jeff A. Shields and Douglas Getty from Everyware for their great technical/sales support. Thanks to Butler product manager, Don J. Reith for giving me the permission to distribute Butler.XFCN, copyright 1994 Everyware Development. Thanks to Tim Bunce for setting me straight on the naming of Butler module instead of using the anachronism, Butperl. Function names are changed from &but_ to &btlr_ as requested by Gilbert Rankin . VIII. Change Log 0.1 Initial working version 0.2 Change name from Butperl to Butler module. Change function names from &but_ to &btlr_. Add &btlr_clnt_errno, &btlr_errno2, &btlr_rv to provide detail status/error information. Fully comment all function calls in the source. Peter Chen 2/26/96 ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <16072-2@oink>; Tue, 27 Feb 1996 07:12:26 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825375392:13741:0; Mon, 26 Feb 96 22:56:32 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa13030; 26 Feb 96 22:55 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa04928; 26 Feb 96 22:53 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA01922 for dbi-users-real; Mon, 26 Feb 1996 09:08:19 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from deimos (deimos.sovam.com [194.67.1.156]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id JAA01918 for ; Mon, 26 Feb 1996 09:08:06 -0800 Received: from chronos ([194.67.3.135]) by deimos.sovam.com with ESMTP id <260558-21922>; Mon, 26 Feb 1996 20:11:42 +0300 Date: Mon, 26 Feb 1996 20:11:37 +0300 (MSK) From: Roman Podshivalov Reply-To: Roman Podshivalov Subject: Re: ora_login trough SQL*Net failed ?! To: Tim Bunce cc: dbi-users@fugue.com In-Reply-To: <9602161218.AA06434@toad.ig.co.uk> Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; LANGUAGE=russian > $ TWO_TASK=foo; export TWO_TASK > > $ sqlplus scott/tiger > > $ perl test.pl > > where test.pl is > > use Oraperl; > ora_login('', 'scott/tiger', '') or die $ora_errno; > print "ok\n"; > Results: romas@chronos ~/oraperl $ export TWO_TASK=T:mars:SVM romas@chronos ~/oraperl $ sqlplus scott/tiger SQL*Plus: Release 3.2.2.0.0 - Production on Mon Feb 26 20:08:48 1996 Copyright (c) Oracle Corporation 1979, 1994. All rights reserved. Connected to: Oracle7 Server Release 7.2.2.4.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.2.2.3.0 - Production SQL> exit Disconnected from Oracle7 Server Release 7.2.2.4.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.2.2.3.0 - Production romas@chronos ~/oraperl $ ./test.pl ORA-06401: NETCMN: invalid driver designator (DBD: login failed) at ./test.pl line 5. romas@chronos ~/oraperl $ export TWO_TASK=TEST romas@chronos ~/oraperl $ sqlplus scott/tiger SQL*Plus: Release 3.2.2.0.0 - Production on Mon Feb 26 20:09:10 1996 Copyright (c) Oracle Corporation 1979, 1994. All rights reserved. Connected to: Oracle7 Server Release 7.2.2.4.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.2.2.3.0 - Production SQL> exit Disconnected from Oracle7 Server Release 7.2.2.4.0 - Production Release With the distributed, replication and parallel query options PL/SQL Release 2.2.2.3.0 - Production romas@chronos ~/oraperl $ ./test.pl ORA-12203: TNS:unable to connect to destination (DBD: login failed) at ./test.pl line 5. romas@chronos ~/oraperl $ cat test.pl #!/usr/local/bin/perl # eval 'use Oraperl; 1' || die $@ if $] >= 5; $lda = &ora_login('', 'scott/tiger', '') || die $ora_errstr; print "ok\n"; &ora_logoff($lda) || die $ora_errstr; hehe, any suggestion ??? ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <16072-3@oink>; Tue, 27 Feb 1996 07:12:44 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825377325:02620:1; Mon, 26 Feb 96 23:28:45 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa02330; 26 Feb 96 23:28 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id NAA02632 for dbi-users-real; Mon, 26 Feb 1996 13:53:23 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from netcomsv.netcom.com (uucp2.netcom.com [163.179.3.2]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id NAA02628 for ; Mon, 26 Feb 1996 13:53:22 -0800 Received: by netcomsv.netcom.com with UUCP (8.6.12/SMI-4.1) id MAA20685; Mon, 26 Feb 1996 12:44:10 -0800 Received: from greedo.vivid.com by vivid.com (NX5.67c/NeXT-2.0) id AA14402; Mon, 26 Feb 96 12:03:39 -0800 Date: Mon, 26 Feb 96 12:03:39 -0800 X-Sender: jake@vivid.vivid.com Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" To: Tim Bunce From: jake@vivid.com (Jake Donham) Subject: Re: Oraperl doesn't return undef on error inside of eval Cc: dbi-users@fugue.com I did some more investigation into this and I'm confused. If I do $cursor = $dbh->prepare(...); $cursor || die "prepare"; things work fine (so I have a workaround), but if I do $cursor = $dbh->prepare(...) || die "prepare"; then I get no exception. I get a warning like Statement handle DBI::st=HASH(0x2f451c) DESTROY ignored - never set up at ./test.pl line 14. in either case, which makes me think that something weird is happening with garbage collection. With $dbh->debug(2) I get: DBI::db=HASH(0x2f4798) debug level set to 2 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x2f4474)~0x2f4798 'fubar select TABLE_NAME from USER_TABLES') <- prepare= undef -> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x30b35c)) Statement handle DBI::st=HASH(0x30b35c) DESTROY ignored - never set up at ./test .pl line 24. <- DESTROY= 1 -> DESTROY for DBD::Oracle::db (DBI::db=HASH(0x2f4798)) <- DESTROY= 1 Jake At 1:16 PM 2/26/96, Tim Bunce wrote: >> From: jake@vivid.com (Jake Donham) >> >> I'm trying to use the eval/die exception-handling mechanism in Perl 5 with >> Oraperl. However, if there's an error in the prepare part of the call, >> Oraperl doesn't seem to return an undef value. Without the eval/die stuff I >> get the expected undef and error message. >> >> Here's an example (with raw DBI calls): >> >> $cursor = $dbh->prepare("select TABLE_NAME from USER_TABLES") >> || die "prepare"; >> >> If you mess up the connect, you get the 'caught exception' bit; if you mess >> up the prepare you get nothing (except a DESTROY warning). >> >> But take off the eval wrapper and it works fine. Anybody know what's up? > >Off-hand, no. > >Oracle.pm says: > > DBD::Oracle::st::_prepare($sth, $statement, @attribs) > or return undef; > >Oracle.xs says: > > void > _prepare(sth, statement, attribs=Nullsv) > SV * sth > char * statement > SV * attribs > CODE: > DBD_ATTRIBS_CHECK("_prepare", sth, attribs); > ST(0) = dbd_st_prepare(sth, statement, attribs) ? &sv_yes : &sv_no; > >and dbd_st_prepare in dbdimp.c has return 0 in all the right places. >Not much chance of that going wrong. What does $dbh->debug(2) show? > >Tim. ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <20093-1@oink>; Tue, 27 Feb 1996 15:03:06 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825428623:11481:2; Tue, 27 Feb 96 13:43:43 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa11026; 27 Feb 96 13:42 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id EAA04118 for dbi-users-real; Tue, 27 Feb 1996 04:09:10 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id EAA04114 for ; Tue, 27 Feb 1996 04:09:08 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id af29112; 27 Feb 96 11:49 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa05035; 27 Feb 96 11:47 GMT Received: from toad by oink with SMTP (PP) id <19018-0@oink>; Tue, 27 Feb 1996 10:15:44 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA15467; Tue, 27 Feb 1996 10:15:33 +0000 Date: Tue, 27 Feb 1996 10:15:33 +0000 From: Tim Bunce Message-Id: <9602271015.AA15467@toad.ig.co.uk> To: romas@online.ru, wiese@datatools.com Subject: Re: ora_login trough SQL*Net failed ?! Cc: dbi-users@fugue.com X-Sun-Charset: US-ASCII content-length: 411 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: Jim Wiese > > On Mon, 26 Feb 1996, Roman Podshivalov wrote: > > > romas@chronos ~/oraperl $ export TWO_TASK=TEST > Please correct me if I'm wrong, but when you have line : > > > #!/usr/local/bin/perl > > You are starting a new shell, and therefore your "TWO_TASK" environment > variable won't be set. Just a thought .... Child processes inherit exported env vars. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <20094-12@oink>; Tue, 27 Feb 1996 15:04:10 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825429137:00126:1; Tue, 27 Feb 96 13:52:17 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa29788; 27 Feb 96 13:51 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id EAA04104 for dbi-users-real; Tue, 27 Feb 1996 04:02:47 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id EAA04100 for ; Tue, 27 Feb 1996 04:02:45 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id aa29161; 27 Feb 96 11:49 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ab05035; 27 Feb 96 11:47 GMT Received: from toad by oink with SMTP (PP) id <19053-0@oink>; Tue, 27 Feb 1996 10:24:43 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA15496; Tue, 27 Feb 1996 10:24:34 +0000 Date: Tue, 27 Feb 1996 10:24:34 +0000 From: Tim Bunce Message-Id: <9602271024.AA15496@toad.ig.co.uk> To: jake@vivid.com Subject: Re: Oraperl doesn't return undef on error inside of eval Cc: dbi-users@fugue.com, perl5-porters@nicoh.com X-Sun-Charset: US-ASCII content-length: 2613 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 Forwarded to perl5-porters for comments. Any ideas what's going on here? Is the return value from the DESTROY causing problems on the stack? Why is eval involved? Tim. ----- Begin Included Message ----- From: jake@vivid.com (Jake Donham) I did some more investigation into this and I'm confused. If I do $cursor = $dbh->prepare(...); $cursor || die "prepare"; things work fine (so I have a workaround), but if I do $cursor = $dbh->prepare(...) || die "prepare"; then I get no exception. I get a warning like Statement handle DBI::st=HASH(0x2f451c) DESTROY ignored - never set up at ./test.pl line 14. in either case, which makes me think that something weird is happening with garbage collection. With $dbh->debug(2) I get: DBI::db=HASH(0x2f4798) debug level set to 2 -> prepare for DBD::Oracle::db (DBI::db=HASH(0x2f4474)~0x2f4798 'fubar select TABLE_NAME from USER_TABLES') <- prepare= undef -> DESTROY for DBD::Oracle::st (DBI::st=HASH(0x30b35c)) Statement handle DBI::st=HASH(0x30b35c) DESTROY ignored - never set up at ./test .pl line 24. <- DESTROY= 1 -> DESTROY for DBD::Oracle::db (DBI::db=HASH(0x2f4798)) <- DESTROY= 1 Jake At 1:16 PM 2/26/96, Tim Bunce wrote: >> From: jake@vivid.com (Jake Donham) >> >> I'm trying to use the eval/die exception-handling mechanism in Perl 5 with >> Oraperl. However, if there's an error in the prepare part of the call, >> Oraperl doesn't seem to return an undef value. Without the eval/die stuff I >> get the expected undef and error message. >> >> Here's an example (with raw DBI calls): >> >> $cursor = $dbh->prepare("select TABLE_NAME from USER_TABLES") >> || die "prepare"; >> >> If you mess up the connect, you get the 'caught exception' bit; if you mess >> up the prepare you get nothing (except a DESTROY warning). >> >> But take off the eval wrapper and it works fine. Anybody know what's up? > >Off-hand, no. > >Oracle.pm says: > > DBD::Oracle::st::_prepare($sth, $statement, @attribs) > or return undef; > >Oracle.xs says: > > void > _prepare(sth, statement, attribs=Nullsv) > SV * sth > char * statement > SV * attribs > CODE: > DBD_ATTRIBS_CHECK("_prepare", sth, attribs); > ST(0) = dbd_st_prepare(sth, statement, attribs) ? &sv_yes : &sv_no; > >and dbd_st_prepare in dbdimp.c has return 0 in all the right places. >Not much chance of that going wrong. What does $dbh->debug(2) show? > >Tim. ----- End Included Message ----- Thanks for the clear message and trace Jake. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <22632-4@oink>; Tue, 27 Feb 1996 23:04:15 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825460370:28134:1; Tue, 27 Feb 96 22:32:50 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa27455; 27 Feb 96 22:31 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa02634; 27 Feb 96 21:33 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA04917 for dbi-users-real; Tue, 27 Feb 1996 09:52:47 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from deimos (deimos.sovam.com [194.67.1.156]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id JAA04913 for ; Tue, 27 Feb 1996 09:52:43 -0800 Received: from ariel ([194.67.3.216]) by deimos.sovam.com with ESMTP id <260574-21924>; Tue, 27 Feb 1996 20:56:34 +0300 Date: Tue, 27 Feb 1996 20:56:32 +0300 (MSK) From: Roman Podshivalov Reply-To: Roman Podshivalov Subject: Any1 use DBD-Oracle with Oracle 7.2.2.4 (exactly) on Solaris 2.4 ? To: dbi-users@fugue.com Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; LANGUAGE=russian Subj ? I've got problem with ora_login trough SQL*Net ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <24773-17@oink>; Wed, 28 Feb 1996 07:11:26 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825477731:18367:1; Wed, 28 Feb 96 03:22:11 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa18160; 28 Feb 96 3:21 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id RAA05831 for dbi-users-real; Tue, 27 Feb 1996 17:03:53 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from mailgw.claircom.com (mailgw.claircom.com [199.5.241.51]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id RAA05827 for ; Tue, 27 Feb 1996 17:03:52 -0800 Received: from nimo.claircom.com by mailgw.claircom.com with smtp (Smail3.1.26.7 #2) id m0traNA-0004ttC; Tue, 27 Feb 96 17:08 PST Received: from airone.claircom.com by nimo.claircom.com with smtp (Smail3.1.26.7 #2) id m0traNA-0005TvC; Tue, 27 Feb 96 17:08 PST Received: from soc3.airone.claircom.com by airone.claircom.com (5.x/SMI-SVR4) id AA18080; Tue, 27 Feb 1996 17:03:30 -0800 Received: by soc3.airone.claircom.com (4.1/SMI-4.1) id AA07199; Tue, 27 Feb 96 17:09:19 PST Date: Tue, 27 Feb 96 17:09:19 PST From: billw@airone.claircom.com (William Warner) Message-Id: <9602280109.AA07199@soc3.airone.claircom.com> To: dbi-users@fugue.com Subject: DBD-Oracle-0.27 won't compile Trying to install DBD-Oracle-0.27. I'm wondering if I have to be the oracle dba to install this. perl5.001m is fine, but is under my home directory. DBI-0.65 seemed to install fine. On first make of DBD, had to edit Oracle.h to add absolute path spec of DBIXS.h. On second make, reported a bunch of errors: Text relocation remains referenced against symbol offset in file ocibrv 0x8 /export/oracle/product/7.2.2/lib/libocic.a(obndrv.o) then died with: ld: fatal: relocations remain against allocatable but non-writable sections *** Error code 1 make: Fatal error: Command failed for target `blib/auto/DBD/Oracle/Oracle.so' % perl -e 'use Config; print Config::myconfig()' Summary of my perl5 (patchlevel 1) configuration: Platform: osname=solaris, osver=2.4, archname=sun4-solaris uname='sunos skyhook 5.4 generic_101945-32 sun4d sparc ' hint=recommended Compiler: cc='cc', optimize='-O' cppflags='' ccflags ='' ldflags ='' stdchar='unsigned char', d_stdstdio=define, usevfork=false voidflags=15, castflags=0, d_casti32=define, d_castneg=define intsize=4, alignbytes=8, usemymalloc=y, randbits=31 Libraries: so=so libpth=/lib /usr/lib /usr/ccs/lib /usr/local/lib libs=-lsocket -lnsl -ldl -lm -lc -lcrypt libc=/usr/lib/libc.so Dynamic Linking: dlsrc=dl_dlopen.xs, dlext=so, d_dlsymun= cccdlflags='-Kpic', ccdlflags=' ', lddlflags='-G' -- William Warner billw@airone.claircom.com work: 206-389-8210 portable: 206-915-1157 page: 206-986-0399 ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <24983-2@oink>; Wed, 28 Feb 1996 07:18:58 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825487478:13976:0; Wed, 28 Feb 96 06:04:38 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa13651; 28 Feb 96 6:03 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id VAA06831 for dbi-users-real; Tue, 27 Feb 1996 21:16:16 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from netcomsv.netcom.com (uucp7.netcom.com [163.179.3.7]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id VAA06827 for ; Tue, 27 Feb 1996 21:16:15 -0800 Received: by netcomsv.netcom.com with UUCP (8.6.12/SMI-4.1) id VAA04000; Tue, 27 Feb 1996 21:15:49 -0800 Received: from greedo.vivid.com by vivid.com (NX5.67c/NeXT-2.0) id AA27949; Tue, 27 Feb 96 21:10:46 -0800 Date: Tue, 27 Feb 96 21:10:46 -0800 X-Sender: jake@vivid.vivid.com Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" To: Tim Bunce From: jake@vivid.com (Jake Donham) Subject: Re: Oraperl doesn't return undef on error inside of eval Cc: dbi-users@fugue.com, perl5-porters@nicoh.com Here's an update on the bug: The specific bug is that die exits the eval block but does not set $@, so an exception handler which checks $@ can't tell that there was an exception thrown. There are two ways that it happens: 1) If a prepare call fails and you have || die after it. The workaround is to replace $cursor = $dbh->prepare(...) || die "foo"; with $cursor = $dbh->prepare(...); $cursor || die "foo"; 2) If the prepare call succeeds and you assign the cursor to a my variable, a subsequent die in the same block fails. Take the following code: #!/usr/bin/perl use DBI; eval { $dbh = DBI->connect('', 'test', 'test', 'Oracle'); $dbh || die "connect"; my $cursor = $dbh->prepare("select TABLE_NAME from USER_TABLES"); $cursor || die "prepare"; die "hoo boy"; $cursor->execute || die "execute"; while (@row = $cursor->fetchrow) { print join(' ', @row), "\n"; } }; if ($@) { die "caught exception---$@"; } If the prepare fails, you'll see the "prepare" exception. If it succeeds, the program will silently exit instead of throwing the "hoo boy" exception. However, if you change $cursor to a local or global variable, the "hoo boy" exception is correctly thrown (this is the workaround). I'm experiencing these bugs with Perl 5.001n, DBI 0.65, DBD 0.27, and Oracle 7.1.6 on a Solaris 2.4 box. Jake ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <24899-25@oink>; Wed, 28 Feb 1996 07:19:10 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825489217:24298:2; Wed, 28 Feb 96 06:33:37 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa24083; 28 Feb 96 6:32 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id VAA06893 for dbi-users-real; Tue, 27 Feb 1996 21:43:45 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id VAA06889 for ; Tue, 27 Feb 1996 21:43:44 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ac25052; 28 Feb 96 2:16 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa15530; 28 Feb 96 2:14 GMT Received: from toad by oink with SMTP (PP) id <23894-0@oink>; Wed, 28 Feb 1996 02:14:20 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA18412; Wed, 28 Feb 1996 02:14:10 +0000 Date: Wed, 28 Feb 1996 02:14:10 +0000 From: Tim Bunce Message-Id: <9602280214.AA18412@toad.ig.co.uk> To: jbolson@lal.cs.utah.edu Subject: Executing stored procedures via DBD/DBI Cc: dbi-users@fugue.com X-Sun-Charset: US-ASCII content-length: 478 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 Forwarded to the dbi-users list. ----- Begin Included Message ----- From: Jonathan Olson Hello again, Tim! It has been a while! How can you execute stored procedures via DBD/DBI? I have tried &ora_do($lda,$stmt) where $stmt = execute stored_procedure(), and I get the error that it is an invalid SQL statement. Indeed, this is true, for it is a PL/SQL statement. Do you have an advice? Thanks, Jonathan ----- End Included Message ----- ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <27763-0@oink>; Wed, 28 Feb 1996 09:26:15 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825499557:23668:1; Wed, 28 Feb 96 09:25:57 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa23456; 28 Feb 96 9:25 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id XAA08200 for dbi-users-real; Tue, 27 Feb 1996 23:52:05 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from netcomsv.netcom.com (uucp3.netcom.com [163.179.3.3]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id XAA08196 for ; Tue, 27 Feb 1996 23:52:04 -0800 Received: by netcomsv.netcom.com with UUCP (8.6.12/SMI-4.1) id WAA20098; Tue, 27 Feb 1996 22:16:05 -0800 Received: from greedo.vivid.com by vivid.com (NX5.67c/NeXT-2.0) id AA28100; Tue, 27 Feb 96 22:07:22 -0800 Date: Tue, 27 Feb 96 22:07:22 -0800 X-Sender: jake@vivid.vivid.com Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" To: Tim Bunce From: jake@vivid.com (Jake Donham) Subject: Re: Executing stored procedures via DBD/DBI Cc: jbolson@lal.cs.utah.edu, dbi-users@fugue.com >How can you execute stored procedures via DBD/DBI? I have tried >&ora_do($lda,$stmt) where $stmt = execute stored_procedure(), and I get >the error that it is an invalid SQL statement. Indeed, this is true, for >it is a PL/SQL statement. You want $stmt = "begin stored_procedure(); end;". SQL*Plus takes some special syntax (including execute) which is not accepted by the Oracle call interface. Jake ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <01777-17@oink>; Wed, 28 Feb 1996 17:25:36 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825526351:03963:2; Wed, 28 Feb 96 16:52:31 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa03694; 28 Feb 96 16:51 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id GAA08791 for dbi-announce-real; Wed, 28 Feb 1996 06:51:07 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from ids.net (ids.net [155.212.1.2]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id GAA08787 for ; Wed, 28 Feb 1996 06:51:06 -0800 Received: from conan.ids.net by ids.net with SMTP; Wed, 28 Feb 1996 9:27:34 -0500 (EST) Date: Wed, 28 Feb 1996 09:27:29 -0500 (EST) From: Brian Jepson To: dbi-announce@fugue.com, postgres95@shiloh.vnet.net Subject: ANNOUNCE: FreeODBC Driver Pack Project Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII Announcing the FreeODBC Driver Pack project What is the FreeODBC Driver Pack project? ========================================= The FreeODBC Driver Pack project is an effort to create a freely redistributable ODBC driver development kit. The FreeODBC driver pack will be portable to all Unix platforms as well as Windows, win32(95, NT), OS/2 and Mac. FreeODBC Drivers will work with any driver manager (such as Microsoft, Visigenic, Intersolv) on those platforms. The FreeODBC driver pack itself will also include a free ODBC driver manager, the iODBC driver manager, which has been finished and can be built on many Unix platforms. Development will initially focus on drivers for Oracle, Sybase, Postgres95, and a single-tier driver for DBF (dBase, FoxPro, Clipper) files. People interested in developing drivers for other databases, such as mSQL, are very welcome to join in. What is the iODBC Driver Manager? ====================================== The iODBC Driver Manager is a freely redistributable ODBC driver manager which runs under many flavors of UNIX, written by Ke Jin of Empress software (kejin@empress.com). It provides a library that can be used by other applications to manipulate ODBC data sources. The ODBC API which is available through iODBC is identical to the one used in the Microsoft ODBC SDK, so it is trivial to develop ODBC-based applications which compile on win32 as well as UNIX platforms. It is available on: ftp://ftp.demon.co.uk/pub/perl/db/other/iODBC/ ftp://ftp.uu.net/pub/database/perl-interfaces/other/iODBC What are the high-level goals of this project? ============================================== One of the goals is to create a powerful and flexible "stub driver" which includes all of the pieces a developer might need to develop their own ODBC driver. This will lower the skill level needed to implement an ODBC driver, as the developer will only be concerned with adding platform-specific code to the stub driver. In addition, this project will provide freely redistributable ODBC drivers for several popular database packages. How can I help? =============== Right now, I'm looking to assemble a team of developers and designers to further refine the high-level goals and ultimately, to start working. I'd like to find up to six top-notch developers with C expertise. Once this group has been formed, the group will determine a time-line, including any incremental deliverables, and start working. For more information and to keep informed about progress you can join the dbi-dev mailing list via http://www.fugue.com/dbi (if you are unable to use the web you can subscribe by sending a message to dbi-dev-request@fugue.com, it may take a few days to be processed). Brian Jepson (bjepson@conan.ids.net) ---===[[[@>>> Perl, FoxPro, SQL Server, HTML http://www.ids.net/~bjepson/ ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <05382-2@oink>; Thu, 29 Feb 1996 07:07:24 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825538231:19054:0; Wed, 28 Feb 96 20:10:31 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa17641; 28 Feb 96 20:09 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id IAA09047 for dbi-users-real; Wed, 28 Feb 1996 08:50:46 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from ns.ge.com (ns.ge.com [192.35.39.24]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id IAA09043 for ; Wed, 28 Feb 1996 08:50:38 -0800 Received: from yugo.cit.ge.com ([3.47.6.26]) by ns.ge.com (8.6.12/8.6.11) with ESMTP id LAA01183 for ; Wed, 28 Feb 1996 11:54:27 -0500 Received: from [3.47.36.32] ([3.47.36.32]) by yugo.cit.ge.com (8.7.2/8.7.2) with ESMTP id LAA13724 for ; Wed, 28 Feb 1996 11:55:19 -0500 (EST) Message-Id: Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Wed, 28 Feb 1996 11:53:58 -0500 To: dbi-users@fugue.com From: Bob Snyder Subject: DBD:Oracle/Oraperl & Long Raw Does the Oraperl emulation mode of DBD::Oracle handle Long Raw data fields? I'm trying to push data into this field, and am getting a ORS-01465 invalid hex number (DBD: oexec error). If not, does anyone have suggestions on dealing with Long Raws? Bob ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <05382-8@oink>; Thu, 29 Feb 1996 07:07:52 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825546142:17400:3; Wed, 28 Feb 96 22:22:22 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa17282; 28 Feb 96 22:22 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id KAA09253 for dbi-users-real; Wed, 28 Feb 1996 10:37:26 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from GRID.unl.ac.uk (clstr.unl.ac.uk [163.167.84.1]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id KAA09249 for ; Wed, 28 Feb 1996 10:37:18 -0800 Received: from grid.unl.ac.uk by grid.unl.ac.uk (PMDF V5.0-4 #10312) id <01I1R92DRW0G9I566L@grid.unl.ac.uk> for dbi-users@fugue.com; Wed, 28 Feb 1996 18:37:49 +0000 (GMT) Date: Wed, 28 Feb 1996 18:37:49 +0000 (GMT) From: "D.S. McNicholl" Subject: Beginer Help ? To: dbi-users@fugue.com Message-id: MIME-version: 1.0 Content-type: TEXT/PLAIN; charset=US-ASCII Content-transfer-encoding: 7BIT Hi, Let me explain my situation and see if anyone can help me. I have 3 sparcs (Solaris 2.4), one Oracle server and two web servers. I have full Oracle 7 installed on the Oracle server and sqlplus installed on the two web servers. I wish to use DBI:Oracle to connect to the Oracle Server and pass the data back to a cgi script. I have perl : * This is perl, version 5.002 gamma I have installed the DBI. When I run perl Makefile.PL on the DBI:Oracle I get : --------------- Use of uninitialized value at Makefile.PL line 27. Configuring DBD::Oracle version ... Remember to actually read the README file! Using Oracle in /export/home/oracle Warning: OCI (Pro*C) does not appear to be installed. cat: cannot open /export/home/oracle/rdbms/lib/sysliblist Oracle sysliblist: Unable to locate proc.mk (use -m /path/to/proc.mk to specify) ---------------- Am I missunderstanding this. I thought the package was to allow remote queries of an Oracle server ? I wish to query Machine1 (Oracle Server) from Machine2 & Machine3 (Web Servers) within a CGI script. Thanx, Dave. ================================================================================ David Sean McNicholl Internet: dave@infonaut.org '@ could become the 'Mc' or 'Mac' of the next millennium.' No Longer 'David Son of Nicholl' ================================================================================ ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <05381-23@oink>; Thu, 29 Feb 1996 07:11:07 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825554743:09245:0; Thu, 29 Feb 96 00:45:43 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa08687; 29 Feb 96 0:44 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa07253; 29 Feb 96 0:42 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id NAA09566 for dbi-users-real; Wed, 28 Feb 1996 13:40:50 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from colossus.cse.psu.edu (root@colossus.cse.psu.edu [130.203.1.2]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id NAA09562 for ; Wed, 28 Feb 1996 13:40:48 -0800 Received: from localhost by colossus.cse.psu.edu with SMTP id <78847>; Wed, 28 Feb 1996 16:45:01 -0500 X-Mailer: exmh version 1.6.5 12/11/95 To: "D.S. McNicholl" cc: dbi-users@fugue.com Subject: Re: Beginer Help ? In-reply-to: Your message of "Wed, 28 Feb 1996 13:37:49 EST." Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Wed, 28 Feb 1996 16:44:40 -0500 From: John D Groenveld Message-Id: <96Feb28.164501est.78847@colossus.cse.psu.edu> Ok, install Pro*C and sqlnet on your clients. > Am I missunderstanding this. I thought the package was to allow > remote queries of an Oracle server ? Yes, but Tim doesnt provide you a transport protocol. You have to use Oracle's. Out of curiousity, has anyone built DBD-Oracle against Linux and Oracle(SCO)? John groenvel@cse.psu.edu ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <11804-0@oink>; Thu, 29 Feb 1996 16:01:15 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825609659:04694:0; Thu, 29 Feb 96 16:00:59 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa04342; 29 Feb 96 16:00 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa11988; 29 Feb 96 15:58 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id GAA11629 for dbi-users-real; Thu, 29 Feb 1996 06:26:00 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from smtp1.interramp.com (smtp1.interramp.com [38.8.45.2]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id GAA11625 for ; Thu, 29 Feb 1996 06:25:59 -0800 Received: from infozen.interramp.com by smtp1.interramp.com (8.6.12/SMI-4.1.3-PSI-irsmtp) id JAA03655; Thu, 29 Feb 1996 09:30:30 -0500 Date: Thu, 29 Feb 96 09:19:47 PST From: Raghu Rao Subject: Oracle DBD error messages To: dbi-users@fugue.com X-Mailer: Chameleon ENGP1, TCP/IP for Windows, NetManage Inc. Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII I'm using Oracle DBD v 0.27 and everything works well except I'm not able to get at the error messages: ... $cursor = $dbh->prepare($dml) || print "Database error: $DBD::Oracle::errstr
"; $rv = $cursor->execute; $cursor->finish; print $rv ? "Record inserted.
" : "Database error: $DBD::Oracle::errstr
"; This does not print out the error messages. Could someone enlighten me on what I'm doing wrong? Thanks for your help. ----------------------------------------------------------------- Raghu Rao InfoZen, Inc. Electronic Publishing Services (Java, CGI, SGML, CDROM, Database) Phone: 301-515-9271 Fax: 301-515-0861 E-mail: raghu@interramp.com ----------------------------------------------------------------- ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <12168-0@oink>; Thu, 29 Feb 1996 17:24:41 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825614643:19038:1; Thu, 29 Feb 96 17:24:03 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa18768; 29 Feb 96 17:23 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa27167; 29 Feb 96 17:21 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA11760 for dbi-users-real; Thu, 29 Feb 1996 07:32:36 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from psa.pencom.com (psisa.com [198.3.200.13]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id HAA11756 for ; Thu, 29 Feb 1996 07:32:32 -0800 Received: (from karafoti@localhost) by psa.pencom.com (Hah!/nope) id JAA07907; Thu, 29 Feb 1996 09:37:00 -0600 (CST) Date: Thu, 29 Feb 1996 09:37:00 -0600 (CST) Message-Id: <199602291537.JAA07907@psa.pencom.com> From: Michael Karafotis To: dbi-users@fugue.com Subject: ORACLE_HOME Problem Can someone help me with this.. My script is running from a cron job so the environment isn't set up. I keep getting the following error: ORACLE_HOME not set! ERROR EVENT: DBI::db=HASH(0x118e54)->DBI::default_handler: 12545 Error while trying to retrieve text for error ORA-12545 (DBD: logi n failed) at /usr/local/lib/perl5/DBD/Oracle.pm line 99 Error while trying to retrieve text for error ORA-12545 (DBD: login failed) at / home/topic315/scripts/splitres line 266. I tried setting the ORACLE_HOME env variable but it still doesn't work, even if I set it in the BEGIN block; well if I set it in the begin block I don't get the ORACLE_HOME not set! error but I do get the ORA-12545 one. It works fine if I run it from the shell. Thanks, -- Michael ______________________________________________________________________________ Michael Karafotis karafoti@pencom.com Member, Pencom Systems Administration On-Site: Fidelity FMR Corp http://www.ari.net/webworks/karafotis/ (617) 563-3692 "The more I look at it, the more I like it ............. I do think its good!" ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <12254-0@oink>; Thu, 29 Feb 1996 17:31:08 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825614731:19822:2; Thu, 29 Feb 96 17:25:31 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa19575; 29 Feb 96 17:24 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA11795 for dbi-announce-real; Thu, 29 Feb 1996 07:51:01 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from gateway1.srs.gov (gateway1.srs.gov [192.33.240.10]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id HAA11791 for ; Thu, 29 Feb 1996 07:50:56 -0800 From: james.taylor@srs.gov Received: by gateway1.srs.gov id AA10179 (InterLock SMTP Gateway 3.0 for dbi-announce@fugue.com); Thu, 29 Feb 1996 10:55:18 -0500 Message-Id: <199602291555.AA10179@gateway1.srs.gov> Received: by gateway1.srs.gov (Internal Mail Agent-1); Thu, 29 Feb 1996 10:55:18 -0500 Date: Thu, 29 Feb 1996 10:55:04 -0500 To: bjepson@conan.ids.net Subject: Re: ANNOUNCE: FreeODBC Driver Pack Project Cc: dbi-announce@fugue.com Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: quoted-printable Content-Md5: BPkH+VDM+Si9bVaV7LH7gg== > used by other applications to manipulate ODBC data sources. The ODBC > API which is available through iODBC is identical to the one used in > the Microsoft ODBC SDK, so it is trivial to develop ODBC-based > applications which compile on win32 as well as UNIX platforms. It is > available on: >=20 > ftp://ftp.demon.co.uk/pub/perl/db/other/iODBC/ > ftp://ftp.uu.net/pub/database/perl-interfaces/other/iODBC >=20 I downloaded this and tested the nntp interface... Works great! But, is there an existing Perl module for the driver manager? Or an = example of=20 the nntp driver using perl? Thanks, James ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <13495-2@oink>; Thu, 29 Feb 1996 19:33:12 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825618841:27954:1; Thu, 29 Feb 96 18:34:01 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa27772; 29 Feb 96 18:33 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa09581; 29 Feb 96 18:32 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA11713 for dbi-dev-real; Thu, 29 Feb 1996 07:13:21 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from homer.louisville.edu (homer.louisville.edu [136.165.1.20]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id HAA11709 for ; Thu, 29 Feb 1996 07:13:20 -0800 Received: from bambi.it-mitc.louisville.edu by homer.louisville.edu; (5.65v3.0/1.1.8.2/03Jun94-0854PM) id AA25476; Thu, 29 Feb 1996 10:17:49 -0500 Message-Id: <1.5.4b11.32.19960229141913.002cb69c@homer.louisville.edu> X-Sender: blswet01@homer.louisville.edu X-Mailer: Windows Eudora Light Version 1.5.4b11 (32) Mime-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Date: Thu, 29 Feb 1996 10:19:13 -0400 To: dbi-dev@fugue.com From: "Brian L. Swett" Subject: DBI Drivers for IDMS I'm the database administrator for the Univeristy of Louisvilles CA-IDMS/R databases. We have the SQL option which provides for ODBC connectivity to our database; but I need access the legacy data from PERL. Anybody working on either a generic ODBC driver for DBperl or a native IDMS driver? -=-=-=-=-=-=-=-=-=-=- Brian Swett, DBA, University of Louisville, MITC Rm 109, Louisville, KY 40292 Ph:502-852-6125 Fax:502-852-5048 mailto://blswet01@homer.louisville.edu http://www.louisville.edu/~blswet01 "My opinions are my own; but I'm not sure where or when I formulated them." ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <13601-0@oink>; Thu, 29 Feb 1996 19:59:00 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825623881:25063:2; Thu, 29 Feb 96 19:58:01 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa24786; 29 Feb 96 19:57 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id KAA12740 for dbi-users-real; Thu, 29 Feb 1996 10:40:56 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from psa.pencom.com (psisa.com [198.3.200.13]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id KAA12736 for ; Thu, 29 Feb 1996 10:40:54 -0800 Received: (from karafoti@localhost) by psa.pencom.com (Hah!/nope) id MAA29579; Thu, 29 Feb 1996 12:45:18 -0600 (CST) Date: Thu, 29 Feb 1996 12:45:18 -0600 (CST) Message-Id: <199602291845.MAA29579@psa.pencom.com> From: karafoti@pencom.com (Michael Karafotis) To: John D Groenveld Cc: karafoti@pencom.com (Michael Karafotis), dbi-users@fugue.com Subject: Re: ORACLE_HOME Problem In-Reply-To: <96Feb29.123324est.78921@colossus.cse.psu.edu> References: <199602291537.JAA07907@psa.pencom.com> <96Feb29.123324est.78921@colossus.cse.psu.edu> I didn't set TNS_ADMIN, but I don't have that set in my shell either. MIchael %% John D Groenveld writes: >> I tried setting the ORACLE_HOME env variable but it still doesn't >> work, even if I set it in the BEGIN block; well if I set it in the >> begin block I don't get the ORACLE_HOME not set! error but I do get >> the ORA-12545 one. jdg> Did you set TNS_ADMIN in that BEGIN block? jdg> % oerr ORA 12545 12545, 00000, "TNS:name lookup failure" // jdg> *Cause: A protocol specific ADDRESS parameter cannot be resolved. jdg> // *Action: Ensure the ADDRESS parameters have been entered jdg> correctly; // the most likely incorrect value is the node name. jdg> John groenvel@cse.psu.edu jdg> -- ______________________________________________________________________________ Michael Karafotis karafoti@pencom.com Member, Pencom Systems Administration On-Site: Fidelity FMR Corp http://www.ari.net/webworks/karafotis/ (617) 563-3692 "The more I look at it, the more I like it ............. I do think its good!" ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <15182-9@oink>; Fri, 1 Mar 1996 07:07:15 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825628698:06568:0; Thu, 29 Feb 96 21:18:18 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa06227; 29 Feb 96 21:17 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa08362; 29 Feb 96 21:14 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA12180 for dbi-users-real; Thu, 29 Feb 1996 09:29:11 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from colossus.cse.psu.edu (root@colossus.cse.psu.edu [130.203.1.2]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id JAA12176 for ; Thu, 29 Feb 1996 09:29:08 -0800 Received: from localhost by colossus.cse.psu.edu with SMTP id <78921>; Thu, 29 Feb 1996 12:33:24 -0500 X-Mailer: exmh version 1.6.5 12/11/95 To: Michael Karafotis cc: dbi-users@fugue.com Subject: Re: ORACLE_HOME Problem In-reply-to: Your message of "Thu, 29 Feb 1996 10:37:00 EST." <199602291537.JAA07907@psa.pencom.com> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Thu, 29 Feb 1996 12:33:07 -0500 From: John D Groenveld Message-Id: <96Feb29.123324est.78921@colossus.cse.psu.edu> > I tried setting the ORACLE_HOME env variable but it still doesn't work, > even if I set it in the BEGIN block; well if I set it in the begin block > I don't get the ORACLE_HOME not set! error but I do get the ORA-12545 > one. Did you set TNS_ADMIN in that BEGIN block? % oerr ORA 12545 12545, 00000, "TNS:name lookup failure" // *Cause: A protocol specific ADDRESS parameter cannot be resolved. // *Action: Ensure the ADDRESS parameters have been entered correctly; // the most likely incorrect value is the node name. John groenvel@cse.psu.edu ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <19441-5@oink>; Fri, 1 Mar 1996 16:52:10 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825685000:12526:0; Fri, 01 Mar 96 12:56:40 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa11964; 1 Mar 96 12:55 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id DAA15301 for dbi-dev-real; Fri, 1 Mar 1996 03:38:42 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id DAA15297 for ; Fri, 1 Mar 1996 03:38:40 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ag01942; 1 Mar 96 11:42 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ae25698; 1 Mar 96 11:39 GMT Received: from toad by oink with SMTP (PP) id <18250-0@oink>; Fri, 1 Mar 1996 11:37:22 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA16659; Fri, 1 Mar 1996 11:37:15 +0000 Date: Fri, 1 Mar 1996 11:37:15 +0000 From: Tim Bunce Message-Id: <9603011137.AA16659@toad.ig.co.uk> To: dbi-dev@fugue.com, blswet01@homer.louisville.edu Subject: Re: DBI Drivers for IDMS X-Sun-Charset: US-ASCII content-length: 253 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: "Brian L. Swett" > > I need access the legacy data from PERL. Anybody working > on either a generic ODBC driver for DBperl or a native IDMS driver? A generic ODBC driver for DBperl is starting to happen. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <19441-15@oink>; Fri, 1 Mar 1996 16:53:01 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825692440:13852:1; Fri, 01 Mar 96 15:00:40 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa13145; 1 Mar 96 14:59 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa04340; 1 Mar 96 14:58 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id FAA15478 for dbi-dev-real; Fri, 1 Mar 1996 05:42:11 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from gateway1.srs.gov (gateway1.srs.gov [192.33.240.10]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id FAA15474 for ; Fri, 1 Mar 1996 05:42:07 -0800 From: james.taylor@srs.gov Received: by gateway1.srs.gov id AA15420 (InterLock SMTP Gateway 3.0 for dbi-dev@fugue.com); Fri, 1 Mar 1996 08:46:03 -0500 Message-Id: <199603011346.AA15420@gateway1.srs.gov> Received: by gateway1.srs.gov (Internal Mail Agent-1); Fri, 1 Mar 1996 08:46:03 -0500 Date: Fri, 1 Mar 1996 08:45:50 -0500 To: dbi-dev@fugue.com, Tim.Bunce@ig.co.uk Subject: Re: DBI Drivers for IDMS Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: quoted-printable Content-Md5: VATee5YpFwa1br3+EWezLw== >=20 > A generic ODBC driver for DBperl is starting to happen. >=20 > Tim. You've mentioned this before, how is it going? Does the FreeODBC Driver Pack announced recently play into this? James ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <19441-17@oink>; Fri, 1 Mar 1996 16:53:09 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825694311:00299:0; Fri, 01 Mar 96 15:31:51 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa29578; 1 Mar 96 15:30 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa10251; 1 Mar 96 15:30 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id DAA15301 for dbi-dev-real; Fri, 1 Mar 1996 03:38:42 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id DAA15297 for ; Fri, 1 Mar 1996 03:38:40 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ag01942; 1 Mar 96 11:42 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ae25698; 1 Mar 96 11:39 GMT Received: from toad by oink with SMTP (PP) id <18250-0@oink>; Fri, 1 Mar 1996 11:37:22 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA16659; Fri, 1 Mar 1996 11:37:15 +0000 Date: Fri, 1 Mar 1996 11:37:15 +0000 From: Tim Bunce Message-Id: <9603011137.AA16659@toad.ig.co.uk> To: dbi-dev@fugue.com, blswet01@homer.louisville.edu Subject: Re: DBI Drivers for IDMS X-Sun-Charset: US-ASCII content-length: 253 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: "Brian L. Swett" > > I need access the legacy data from PERL. Anybody working > on either a generic ODBC driver for DBperl or a native IDMS driver? A generic ODBC driver for DBperl is starting to happen. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <19441-20@oink>; Fri, 1 Mar 1996 16:53:23 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825695450:10577:0; Fri, 01 Mar 96 15:50:50 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa10325; 1 Mar 96 15:50 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa13332; 1 Mar 96 15:48 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id GAA15562 for dbi-dev-real; Fri, 1 Mar 1996 06:29:02 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from ids.net (ids.net [155.212.1.2]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id GAA15558 for ; Fri, 1 Mar 1996 06:29:01 -0800 Received: from conan.ids.net by ids.net with SMTP; Fri, 1 Mar 1996 9:32:02 -0500 (EST) Date: Fri, 1 Mar 1996 09:31:40 -0500 (EST) From: Brian Jepson To: james.taylor@srs.gov cc: dbi-dev@fugue.com Subject: Re: ANNOUNCE: FreeODBC Driver Pack Project In-Reply-To: <199602291555.AA10179@gateway1.srs.gov> Message-ID: MIME-Version: 1.0 Content-Type: TEXT/PLAIN; charset=US-ASCII On Thu, 29 Feb 1996 james.taylor@srs.gov wrote: [...] > > > > ftp://ftp.demon.co.uk/pub/perl/db/other/iODBC/ > > ftp://ftp.uu.net/pub/database/perl-interfaces/other/iODBC > > > > I downloaded this and tested the nntp interface... Works great! > > But, is there an existing Perl module for the driver manager? Or an > example of > the nntp driver using perl? > As DBI "becomes" ODBC (see Tim Bunce's New Directions post from a while back), the effort going into freeODBC will provide an SDK for those wishing to build new drivers for DBI/ODBC. As an added bonus, you will get several drivers with freeODBC. It is likely that the New Directions effort will go on in parallel, and at certain points, it may become impossible to distinguish between the two efforts without special glasses of some sort. So, ultimately, DBI will be the Perl module for the driver manager. But not yet. Brian Jepson (bjepson@conan.ids.net) ---===[[[@>>> Perl, FoxPro, SQL Server, HTML http://www.ids.net/~bjepson/ ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <27035-12@oink>; Mon, 4 Mar 1996 07:10:04 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825717865:05846:0; Fri, 01 Mar 96 22:04:25 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa05244; 1 Mar 96 22:03 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa20532; 1 Mar 96 19:45 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA16078 for dbi-users-real; Fri, 1 Mar 1996 09:38:53 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from underground.net (dazed.boxtop.com [204.119.208.4]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id JAA16074 for ; Fri, 1 Mar 1996 09:38:50 -0800 Received: from porky.boxtop.com by underground.net with smtp id m0tsYrT-001eeSC; ( Smail #1) for ; Fri, 1 Mar 96 09:43 PST Received: by porky.boxtop.com with Microsoft Mail id <01BB0753.833529C0@porky.boxtop.com>; Fri, 1 Mar 1996 09:43:14 -0800 Message-ID: <01BB0753.833529C0@porky.boxtop.com> From: Analyn Sales To: "'dbi-users@fugue.com'" Cc: "'tammy@boxtop.com'" Subject: ora_fetch returns scalar value when expecting a list Date: Fri, 1 Mar 1996 09:43:13 -0800 MIME-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit Hi, I am having a very unnerving experience with DBI 0.65, DBD 0.27, perl 5.002., Oracle 7.2. I call the following subroutine.... sub fetchGenre { local($lda, $csr, @values, $val, $id); $lda = &ora_login($ENV{'ORACLE_SID'}, $dbUser, $dbPasswd) || &HTMLErrorPage($ora_errstr); $csr = &ora_open($lda, "select ug.name, ug.id \ from upn_genre ug \ where ug.name IS NOT NULL", 6) || &HTMLErrorPage($ora_errstr); while (($val, $id) = &ora_fetch($csr)) { if ($ora_errno) { &HTMLErrorPage($ora_errstr); } print "\ngenre is $val\n"; print "id is $id\n"; print "ora_errno is $ora_errno\n"; print "ora_errstr is $ora_errstr\n"; print "cursor is $csr\n"; sleep(3); #exit; push(@values, $val); print "\nHere loop"; } } And get the following unexpected results... Here loop genre is 2 id is ora_errno is ora_errstr is cursor is DBI::st=HASH(0xeae00) Here loop genre is 2 id is ora_errno is ora_errstr is cursor is DBI::st=HASH(0xeae00) ad infinitum (you get the picture). The ora_fetch insists on returning a scalar no matter what I do. I have tried this with a varying number of fields and yes it is definately returning the number of fields correctly. I would really rather have the field values themselves however! Any hints anyone? Is this a peculiarity between perl 5002 and DBperl? Should I move back to perl 5.001m? I have several very useful web libraries that require 5.002 to run however:( Also, is there a version of standard Oraperl for perl 5.002 (or for perl5 in general)? please help, -tammy tammy@boxtop.com BoxTop Interactive ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <27111-12@oink>; Mon, 4 Mar 1996 07:12:43 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825893503:20738:0; Sun, 03 Mar 96 22:51:43 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa19948; 3 Mar 96 22:50 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id NAA22839 for dbi-users-real; Sun, 3 Mar 1996 13:26:42 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from GRID.unl.ac.uk (clstr.unl.ac.uk [163.167.84.1]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id NAA22835 for ; Sun, 3 Mar 1996 13:26:39 -0800 Received: from grid.unl.ac.uk by grid.unl.ac.uk (PMDF V5.0-4 #10312) id <01I1WP08X7B49I5IQC@grid.unl.ac.uk> for dbi-users@fugue.com; Sun, 03 Mar 1996 16:08:11 +0000 (GMT) Date: Sun, 03 Mar 1996 16:08:11 +0000 (GMT) From: "D.S. McNicholl" Subject: Installation. To: dbi-users@fugue.com Message-id: MIME-version: 1.0 Content-type: TEXT/PLAIN; charset=US-ASCII Content-transfer-encoding: 7BIT Hi, When I compile DBD it says that PRO*C does not appear to be installed. I have installed PRO*C from the cdrom. but sure enough the directory rdbms/demo/ does not exist. is there something else i should be installing to have this directory ? P.S> Installed is sqlplus (includes sqlnet V2) and Pro*c. Thanx, Dave. ================================================================================ David Sean McNicholl Internet: dave@infonaut.org '@ could become the 'Mc' or 'Mac' of the next millennium.' No Longer 'David Son of Nicholl' ================================================================================ 'Microserfs : Douglas Coupland' ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <27035-59@oink>; Mon, 4 Mar 1996 07:18:38 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825769381:18214:0; Sat, 02 Mar 96 12:23:01 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa17894; 2 Mar 96 12:22 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa12269; 1 Mar 96 22:20 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id MAA16881 for dbi-users-real; Fri, 1 Mar 1996 12:43:12 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from underground.net (dazed.boxtop.com [204.119.208.4]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id MAA16877 for ; Fri, 1 Mar 1996 12:43:10 -0800 Received: from tammy.boxtop.com by underground.net with smtp id m0tsbjw-001ef4C; ( Smail #1) for ; Fri, 1 Mar 96 12:47 PST Received: by tammy.boxtop.com with Microsoft Mail id <01BB076C.ED6C9800@tammy.boxtop.com>; Fri, 1 Mar 1996 12:45:10 -0800 Message-ID: <01BB076C.ED6C9800@tammy.boxtop.com> From: Tammy McKean To: "'dbi-users@fugue.com'" Subject: FW: ora_fetch returns scalar value when expecting a list Date: Fri, 1 Mar 1996 12:45:09 -0800 MIME-Version: 1.0 Content-Type: text/plain; charset="us-ascii" Content-Transfer-Encoding: 7bit Just FYI, Reverting to perl 5001m, with DBI 0.65 and DBD 0.27 for Oracle fixed this. The same code magically started working again. I saw the announcement to upgrade to DBD 0.28 and DBI 0.66 with perl 5.002. I will try this later and verify that this will work as well. -tammy ---------- From: Analyn Sales[SMTP:ann@boxtop.com] Sent: Friday, March 01, 1996 9:43 AM To: 'dbi-users@fugue.com' Cc: 'tammy@boxtop.com' Subject: ora_fetch returns scalar value when expecting a list Hi, I am having a very unnerving experience with DBI 0.65, DBD 0.27, perl 5.002., Oracle 7.2. I call the following subroutine.... sub fetchGenre { local($lda, $csr, @values, $val, $id); $lda = &ora_login($ENV{'ORACLE_SID'}, $dbUser, $dbPasswd) || &HTMLErrorPage($ora_errstr); $csr = &ora_open($lda, "select ug.name, ug.id \ from upn_genre ug \ where ug.name IS NOT NULL", 6) || &HTMLErrorPage($ora_errstr); while (($val, $id) = &ora_fetch($csr)) { if ($ora_errno) { &HTMLErrorPage($ora_errstr); } print "\ngenre is $val\n"; print "id is $id\n"; print "ora_errno is $ora_errno\n"; print "ora_errstr is $ora_errstr\n"; print "cursor is $csr\n"; sleep(3); #exit; push(@values, $val); print "\nHere loop"; } } And get the following unexpected results... Here loop genre is 2 id is ora_errno is ora_errstr is cursor is DBI::st=HASH(0xeae00) Here loop genre is 2 id is ora_errno is ora_errstr is cursor is DBI::st=HASH(0xeae00) ad infinitum (you get the picture). The ora_fetch insists on returning a scalar no matter what I do. I have tried this with a varying number of fields and yes it is definately returning the number of fields correctly. I would really rather have the field values themselves however! Any hints anyone? Is this a peculiarity between perl 5002 and DBperl? Should I move back to perl 5.001m? I have several very useful web libraries that require 5.002 to run however:( Also, is there a version of standard Oraperl for perl 5.002 (or for perl5 in general)? please help, -tammy tammy@boxtop.com BoxTop Interactive ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <27171-33@oink>; Mon, 4 Mar 1996 07:19:46 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825773471:26886:2; Sat, 02 Mar 96 13:31:11 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa26486; 2 Mar 96 13:30 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa12267; 1 Mar 96 22:20 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id NAA16949 for dbi-users-real; Fri, 1 Mar 1996 13:06:06 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from GRID.unl.ac.uk (clstr.unl.ac.uk [163.167.84.1]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id NAA16931 for ; Fri, 1 Mar 1996 13:03:35 -0800 Received: from grid.unl.ac.uk by grid.unl.ac.uk (PMDF V5.0-4 #10312) id <01I1U6XR53UO9I52NP@grid.unl.ac.uk> for dbi-users@fugue.com; Fri, 01 Mar 1996 21:09:11 +0000 (GMT) Date: Fri, 01 Mar 1996 21:09:11 +0000 (GMT) From: "D.S. McNicholl" Subject: Compiling To: dbi-users@fugue.com Message-id: MIME-version: 1.0 Content-type: TEXT/PLAIN; charset=US-ASCII Content-transfer-encoding: 7BIT Hi, When I compile DBI I get the following (output from script) --------- Script started on Fri Mar 01 20:59:57 1996 # perl Makefile.PL Remember to actually *read* the README file! Build, TEST and INSTALL Perl 5 first. Use version 5.002beta2 or later. DO NOT build the DBI under the Perl source tree. Use 'make test' to execute self tests. Install DBI (using 'make install' before building DBD::* drivers. MakeMaker (v5.21) Checking if your kit is complete... Looks good NAME => q[DBI] VERSION_FROM => q[DBI.pm] dist => { DIST_DEFAULT=>q[clean distcheck disttest ci tardist] } DBI VERSION is 0.66 (from DBI.pm) Using PERL=/usr/bin/perl Writing Makefile for DBI # make umask 0 && cp DBIXS.h blib/arch//DBI/DBIXS.h umask 0 && cp lib/DBD/ExampleP.pm blib/lib//DBD/ExampleP.pm umask 0 && cp lib/DBD/NullP.pm blib/lib//DBD/NullP.pm umask 0 && cp lib/DBD/Sponge.pm blib/lib//DBD/Sponge.pm umask 0 && cp DBI.pm blib/lib//DBI.pm /usr/bin/perl -I/usr/local/lib/perl5/sun4-solaris/5.002 -I/usr/local/lib/perl5 /usr/local/lib/perl5/ExtUtils/xsubpp -typemap /usr/local/lib/perl5/ExtUtils/typemap DBI.xs >DBI.tc && mv DBI.tc DBI.c cc -c -I/opt/gnu/include -O -DVERSION=\"0.66\" -DXS_VERSION=\"0.66\" -Kpic -I/usr/local/lib/perl5/sun4-solaris/5.002/CORE/ DBI.c "DBI.c", line 1269: warning: end-of-loop code not reached "DBI.c", line 1283: warning: end-of-loop code not reached "DBI.c", line 1327: warning: end-of-loop code not reached Running Mkbootstrap for DBI () chmod 644 DBI.bs LD_RUN_PATH="" cc -o blib/arch//auto/DBI/DBI.so -G -L/usr/local/lib -L/opt/gnu/lib DBI.o chmod 755 blib/arch//auto/DBI/DBI.so cp DBI.bs ./blib/arch//auto/DBI/DBI.bs chmod 644 blib/arch//auto/DBI/DBI.bs # make test PERL_DL_NONLAZY=1 /usr/bin/perl -I./blib/arch/ -I./blib/lib/ -I/usr/local/lib/perl5/sun4-solaris/5.002 -I/usr/local/lib/perl5 -e 'use Test::Harness qw(&runtests $verbose); $verbose=0; runtests @ARGV;' t/*.t t/min...............DBD::ExampleP in /usr/local/lib/perl5/site_perl is hidden by DBD::ExampleP in ./blib/lib/ at t/min.t line 16 DBD::NullP in /usr/local/lib/perl5/site_perl is hidden by DBD::NullP in ./blib/lib/ at t/min.t line 16 DBD::Sponge in /usr/local/lib/perl5/site_perl is hidden by DBD::Sponge in ./blib/lib/ at t/min.t line 16 Aborting test: output counter mismatch [test 4 answered when test 5 expected] FAILED tests 5-11 Failed 7/11 tests, 36.36% okay Test returned status 0 (wstat 13) Failed 1 test script, 0.00% okay. 6/11 subtests failed, 45.45% okay. *** Error code 29 make: Fatal error: Command failed for target `test_dynamic' # make test TEST_VERBOSE=1 PERL_DL_NONLAZY=1 /usr/bin/perl -I./blib/arch/ -I./blib/lib/ -I/usr/local/lib/perl5/sun4-solaris/5.002 -I/usr/local/lib/perl5 -e 'use Test::Harness qw(&runtests $verbose); $verbose=1; runtests @ARGV;' t/*.t t/min...............1..11 ok 1 ok 2 ok 3 DBD::ExampleP in /usr/local/lib/perl5/site_perl is hidden by DBD::ExampleP in ./blib/lib/ at t/min.t line 16 DBD::NullP in /usr/local/lib/perl5/site_perl is hidden by DBD::NullP in ./blib/lib/ at t/min.t line 16 DBD::Sponge in /usr/local/lib/perl5/site_perl is hidden by DBD::Sponge in ./blib/lib/ at t/min.t line 16 ok 4 ok 4 Aborting test: output counter mismatch [test 4 answered when test 5 expected] FAILED tests 5-11 Failed 7/11 tests, 36.36% okay Test returned status 0 (wstat 13) Failed 1 test script, 0.00% okay. 6/11 subtests failed, 45.45% okay. *** Error code 29 make: Fatal error: Command failed for target `test_dynamic' # uname -a SunOS netra1 5.4 Generic_101945-10 sun4m sparc # perl -v This is perl, version 5.002 gamma Copyright 1987-1996, Larry Wall Perl may be copied only under the terms of either the Artistic License or the GNU General Public License, which may be found in the Perl 5.0 source kit. # script done on Fri Mar 01 21:02:34 1996 ------------- Any help gratefully appreciatted. Thanx, Dave. ================================================================================ David Sean McNicholl Internet: dave@infonaut.org '@ could become the 'Mc' or 'Mac' of the next millennium.' No Longer 'David Son of Nicholl' ================================================================================ 'Microserfs : Douglas Coupland' ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <27035-69@oink>; Mon, 4 Mar 1996 07:21:04 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825783318:24934:1; Sat, 02 Mar 96 16:15:18 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa24500; 2 Mar 96 16:14 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa27738; 2 Mar 96 16:00 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id GAA20087 for dbi-users-real; Sat, 2 Mar 1996 06:49:52 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from anna.mind.de (anna.mind.de [193.101.72.227]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id GAA20083 for ; Sat, 2 Mar 1996 06:49:49 -0800 Received: by anna.mind.de (940816.SGI.8.6.9/940406.SGI) id PAA03570; Sat, 2 Mar 1996 15:53:37 +0100 Date: Sat, 2 Mar 1996 15:53:37 +0100 Message-Id: <199603021453.PAA03570@anna.mind.de> From: Andreas Koenig To: eqr6mcnichd@unl.ac.uk CC: dbi-users@fugue.com In-reply-to: (eqr6mcnichd@unl.ac.uk) Subject: Re: Compiling Reply-to: andreas.koenig@mind.de >>>>> "david" == "D S McNicholl" writes: [...] david> DBI VERSION is 0.66 (from DBI.pm) as far as I know, DBI 0.67 fixes some (or maybe all) of your problems. Make sure, $Config{privlibexp} and $Config{oldarchlibexp} do not contain DBI/DBD modules. You'll have to fix this manually. No MakeMaker support for this (yet)... andreas ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <03114-0@oink>; Mon, 4 Mar 1996 11:24:08 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825928364:28752:1; Mon, 04 Mar 96 08:32:44 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa28436; 4 Mar 96 8:31 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id XAA24015 for dbi-users-real; Sun, 3 Mar 1996 23:26:56 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from voro.lbl.gov (voro.lbl.gov [131.243.240.19]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id XAA24011 for ; Sun, 3 Mar 1996 23:26:55 -0800 Received: from voro (localhost [127.0.0.1]) by voro.lbl.gov (8.6.12/G) with ESMTP id XAA21557 for ; Sun, 3 Mar 1996 23:30:37 -0800 Message-Id: <199603040730.XAA21557@voro.lbl.gov> X-Mailer: exmh version 1.6.2 7/18/95 Reply-to: mtdedlow@lbl.gov To: dbi-users@fugue.com Subject: fetchrow goes forever Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Sun, 03 Mar 1996 23:30:37 -0800 From: Mark Dedlow Anyone have ideas about this problem: $query = "select tname from tab"; $cursor = $dbh->prepare($query); $cursor->execute; while ( @row = $cursor->fetchrow) { print "@row\n"; } It works fine, but after the data prints out it goes on infinitely, printing blank lines. DBI-0.67 DBD-0.28 Solaris 2.4 Oracle 7.2.2.3 Thanks, Mark ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <04574-8@oink>; Mon, 4 Mar 1996 15:36:14 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825953029:15922:4; Mon, 04 Mar 96 15:23:49 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa15608; 4 Mar 96 15:23 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id GAA24489 for dbi-users-real; Mon, 4 Mar 1996 06:14:17 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id GAA24485 for ; Mon, 4 Mar 1996 06:14:14 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ae25281; 4 Mar 96 14:08 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id af06651; 4 Mar 96 14:04 GMT Received: from toad by oink with SMTP (PP) id <03723-0@oink>; Mon, 4 Mar 1996 13:21:12 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA24370; Mon, 4 Mar 1996 13:21:05 +0000 Date: Mon, 4 Mar 1996 13:21:05 +0000 From: Tim Bunce Message-Id: <9603041321.AA24370@toad.ig.co.uk> To: dbi-users@fugue.com, mtdedlow@lbl.gov Subject: Re: fetchrow goes forever X-Sun-Charset: US-ASCII content-length: 500 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: Mark Dedlow > > Anyone have ideas about this problem: > > $query = "select tname from tab"; > $cursor = $dbh->prepare($query); > $cursor->execute; > while ( @row = $cursor->fetchrow) { > print "@row\n"; > } > > It works fine, but after the data prints out it goes > on infinitely, printing blank lines. > > DBI-0.67 > DBD-0.28 > Solaris 2.4 > Oracle 7.2.2.3 Add $cursor->debug(2) before the fetch and report back what it says (just the interesting bits). Tim. ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <04574-11@oink>; Mon, 4 Mar 1996 15:36:25 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825953632:22048:0; Mon, 04 Mar 96 15:33:52 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa21269; 4 Mar 96 15:32 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id GAA24462 for dbi-users-real; Mon, 4 Mar 1996 06:02:45 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from child.prodigy.cs.cmu.edu (CHILD.PRODIGY.CS.CMU.EDU [128.2.242.220]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id GAA24458 for ; Mon, 4 Mar 1996 06:02:44 -0800 From: rudis+@child.prodigy.cs.cmu.edu Message-Id: <199603041402.GAA24458@toccata.fugue.com> Date: Mon, 4 Mar 96 9:07:53 EST Apparently-To: Mark Dedlow wrote: > Anyone have ideas about this problem: > > $query = "select tname from tab"; > $cursor = $dbh->prepare($query); > $cursor->execute; > while ( @row = $cursor->fetchrow) { > print "@row\n"; > } > > It works fine, but after the data prints out it goes > on infinitely, printing blank lines. The problem is not with DBI/DBD/fetchrow, as the following program shows the exact same behaviour. Figure out what's wrong with it, and you'll have your answer. @a = qw(0 2 4 6 8); @b = qw(1 3 5 7 9); sub fetchrow { $i < @a ? ($a[$i], $b[$i++]) : undef } while (@row = fetchrow) { print "@row\n"; } Output: 0 1 2 3 4 5 6 7 8 9 [ and lots of blank lines ... ] Later, Rujith. ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <07060-6@oink>; Mon, 4 Mar 1996 20:42:31 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825969617:17354:1; Mon, 04 Mar 96 20:00:17 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa17038; 4 Mar 96 19:59 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id KAA25024 for dbi-users-real; Mon, 4 Mar 1996 10:18:43 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from gwdu42.gwdg.de (root@gwdu42.gwdg.de [134.76.10.26]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id KAA25020 for ; Mon, 4 Mar 1996 10:18:39 -0800 Received: from mcloud-machine (actually RAS004.gwdg.de) by gwdu42.gwdg.de with SMTP (PP); Mon, 4 Mar 1996 19:23:11 +0100 Message-ID: <313B34CA.2C78@gwdg.de> Date: Mon, 04 Mar 1996 19:22:02 +0100 From: bbeilke X-Mailer: Mozilla 2.0 (Win95; I) MIME-Version: 1.0 To: dbi-users@fugue.com Subject: unsubscribe Content-Type: text/plain; charset=us-ascii Content-Transfer-Encoding: 7bit unsubscribe ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <07400-15@oink>; Mon, 4 Mar 1996 21:29:02 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825960064:03727:0; Mon, 04 Mar 96 17:21:04 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa03193; 4 Mar 96 17:20 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa03255; 4 Mar 96 17:15 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id HAA24635 for dbi-dev-real; Mon, 4 Mar 1996 07:51:22 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id HAA24631 for ; Mon, 4 Mar 1996 07:51:20 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ac25277; 4 Mar 96 14:08 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ab06651; 4 Mar 96 14:03 GMT Received: from toad by oink with SMTP (PP) id <03425-0@oink>; Mon, 4 Mar 1996 12:08:27 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA24239; Mon, 4 Mar 1996 12:08:20 +0000 Date: Mon, 4 Mar 1996 12:08:20 +0000 From: Tim Bunce Message-Id: <9603041208.AA24239@toad.ig.co.uk> To: dbi-dev@fugue.com, james.taylor@srs.gov Subject: Re: DBI Drivers for IDMS X-Sun-Charset: US-ASCII content-length: 395 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: james.taylor@srs.gov > > > A generic ODBC driver for DBperl is starting to happen. > > You've mentioned this before, how is it going? Slowly so far. I'm still clearing a backlog of other work. I still want to release an update to Safe first. It'll pick up soon. > Does the FreeODBC Driver Pack announced recently play into this? Yes kind'a - but from the opposite direction. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <07400-36@oink>; Mon, 4 Mar 1996 21:30:21 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825966897:06685:2; Mon, 04 Mar 96 19:14:57 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa06375; 4 Mar 96 19:14 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa20882; 4 Mar 96 19:12 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id IAA24736 for dbi-users-real; Mon, 4 Mar 1996 08:57:57 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from voro.lbl.gov (voro.lbl.gov [131.243.240.19]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id IAA24732 for ; Mon, 4 Mar 1996 08:57:54 -0800 Received: from voro (localhost [127.0.0.1]) by voro.lbl.gov (8.6.12/G) with ESMTP id JAA22869; Mon, 4 Mar 1996 09:01:03 -0800 Message-Id: <199603041701.JAA22869@voro.lbl.gov> X-Mailer: exmh version 1.6.2 7/18/95 To: Tim Bunce cc: dbi-users@fugue.com, mtdedlow@lbl.gov Subject: Re: fetchrow goes forever In-reply-to: Your message of "Mon, 04 Mar 1996 13:21:05 GMT." <9603041321.AA24370@toad.ig.co.uk> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Mon, 04 Mar 1996 09:01:02 -0800 From: Mark Dedlow > > From: Mark Dedlow > > > > Anyone have ideas about this problem: > > > > $query = "select tname from tab"; > > $cursor = $dbh->prepare($query); > > $cursor->execute; > > while ( @row = $cursor->fetchrow) { > > print "@row\n"; > > } > > > > It works fine, but after the data prints out it goes > > on infinitely, printing blank lines. > > > > DBI-0.67 > > DBD-0.28 > > Solaris 2.4 > > Oracle 7.2.2.3 > > Add $cursor->debug(2) before the fetch and report back what it says > (just the interesting bits). > > Tim. The cursor is now on a 2-row table. debug says fetchrow is undef on the third fetch, but perl doesn't seem to think @row is undef. DBI::st=HASH(0x142ed8) debug level set to 2 -> fetchrow for DBD::Oracle::st (DBI::st=HASH(0x142e3c)~0x142ed8) <- fetchrow= '1' 1 -> fetchrow for DBD::Oracle::st (DBI::st=HASH(0x142e3c)~0x142ed8) <- fetchrow= '2' 2 -> fetchrow for DBD::Oracle::st (DBI::st=HASH(0x142e3c)~0x142ed8) <- fetchrow= undef -> fetchrow for DBD::Oracle::st (DBI::st=HASH(0x142e3c)~0x142ed8) <- fetchrow= undef Mark ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <07400-45@oink>; Mon, 4 Mar 1996 21:30:50 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825968910:25293:0; Mon, 04 Mar 96 19:48:30 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-1.mail.demon.net id aa22519; 4 Mar 96 19:47 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA24894 for dbi-users-real; Mon, 4 Mar 1996 09:51:43 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from voro.lbl.gov (voro.lbl.gov [131.243.240.19]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id JAA24890 for ; Mon, 4 Mar 1996 09:51:38 -0800 Received: from voro (localhost [127.0.0.1]) by voro.lbl.gov (8.6.12/G) with ESMTP id JAA23282; Mon, 4 Mar 1996 09:55:14 -0800 Message-Id: <199603041755.JAA23282@voro.lbl.gov> X-Mailer: exmh version 1.6.2 7/18/95 To: "Rujith S. de Silva" cc: mtdedlow@lbl.gov, dbi-users@fugue.com Subject: Re: fetchrow goes forever In-reply-to: Your message of "Mon, 04 Mar 1996 08:57:39 EST." <313AF6D3.41C67EA6@ind70.industry.net> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Mon, 04 Mar 1996 09:55:13 -0800 From: Mark Dedlow > Mark Dedlow wrote: > > Anyone have ideas about this problem: > > > > $query = "select tname from tab"; > > $cursor = $dbh->prepare($query); > > $cursor->execute; > > while ( @row = $cursor->fetchrow) { > > print "@row\n"; > > } > > > > It works fine, but after the data prints out it goes > > on infinitely, printing blank lines. > Rujith S. de Silva wrote: > The problem is not with DBI/DBD/fetchrow, as the following program shows > the exact same behaviour. Figure out what's wrong with it, and you'll > have your answer. > > @a = qw(0 2 4 6 8); @b = qw(1 3 5 7 9); > sub fetchrow { $i < @a ? ($a[$i], $b[$i++]) : undef } > > while (@row = fetchrow) { print "@row\n"; } > > Output: > > 0 1 > 2 3 > 4 5 > 6 7 > 8 9 > [ and lots of blank lines ... ] > > Later, > Rujith. I understand your example, but DBI fetchrow would be more acurrately simulated as: sub fetchrow { $i < @a ? ($a[$i], $b[$i++]) : ( ) } which will not run infinitely in the example while loop. However, your example did in fact make me realize that on my installation, fetchrow IS behaving like your sample, not as it should be, i.e. fetchrow is returning 'undef' when it should be returning an empty list. But I still don't know why.... Thanks, Mark ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <07400-50@oink>; Mon, 4 Mar 1996 21:31:17 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825969074:26726:1; Mon, 04 Mar 96 19:51:14 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa26282; 4 Mar 96 19:50 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa27278; 4 Mar 96 19:46 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA24835 for dbi-users-real; Mon, 4 Mar 1996 09:26:10 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id JAA24831 for ; Mon, 4 Mar 1996 09:26:08 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ag14861; 4 Mar 96 16:59 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ad00983; 4 Mar 96 16:54 GMT Received: from toad by oink with SMTP (PP) id <05068-0@oink>; Mon, 4 Mar 1996 16:00:15 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA25001; Mon, 4 Mar 1996 16:00:08 +0000 Date: Mon, 4 Mar 1996 16:00:08 +0000 From: Tim Bunce Message-Id: <9603041600.AA25001@toad.ig.co.uk> To: dbi-users@fugue.com, eqr6mcnichd@unl.ac.uk Subject: Re: Installation. X-Sun-Charset: US-ASCII content-length: 515 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: "D.S. McNicholl" > > Hi, > When I compile DBD it says that PRO*C does not appear to be > installed. I have installed PRO*C from the cdrom. but sure enough the > directory rdbms/demo/ does not exist. is there something else i should be > installing to have this directory ? > > P.S> Installed is sqlplus (includes sqlnet V2) and Pro*c. Where did it get installed? What version of Oracle? What version of Pro*C? You can use perl Makefile.PL -m /path/to/proc/makefile Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <07400-61@oink>; Mon, 4 Mar 1996 21:32:24 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825970927:13973:1; Mon, 04 Mar 96 20:22:07 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa13784; 4 Mar 96 20:21 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa03238; 4 Mar 96 20:20 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id JAA24841 for dbi-users-real; Mon, 4 Mar 1996 09:26:46 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id JAA24837 for ; Mon, 4 Mar 1996 09:26:44 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id al14811; 4 Mar 96 16:59 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id ae00983; 4 Mar 96 16:55 GMT Received: from toad by oink with SMTP (PP) id <05084-0@oink>; Mon, 4 Mar 1996 16:03:53 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA25010; Mon, 4 Mar 1996 16:03:47 +0000 Date: Mon, 4 Mar 1996 16:03:47 +0000 From: Tim Bunce Message-Id: <9603041603.AA25010@toad.ig.co.uk> To: dbi-users@fugue.com, rsnyder@yugo.cit.ge.com Subject: Re: DBD:Oracle/Oraperl & Long Raw X-Sun-Charset: US-ASCII content-length: 369 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: Bob Snyder > > Does the Oraperl emulation mode of DBD::Oracle handle Long Raw data fields? > I'm trying to push data into this field, and am getting a ORS-01465 invalid > hex number (DBD: oexec error). > > If not, does anyone have suggestions on dealing with Long Raws? I believe RAW's are always transferred as hex strings. Tim. ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <07400-63@oink>; Mon, 4 Mar 1996 21:32:30 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825971077:15403:1; Mon, 04 Mar 96 20:24:37 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa15185; 4 Mar 96 20:24 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa03723; 4 Mar 96 20:22 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id KAA24937 for dbi-users-real; Mon, 4 Mar 1996 10:03:48 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id KAA24933 for ; Mon, 4 Mar 1996 10:03:42 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ao14797; 4 Mar 96 16:59 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa00983; 4 Mar 96 16:54 GMT Received: from toad by oink with SMTP (PP) id <04970-0@oink>; Mon, 4 Mar 1996 15:50:00 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA24961; Mon, 4 Mar 1996 15:49:54 +0000 Date: Mon, 4 Mar 1996 15:49:54 +0000 From: Tim Bunce Message-Id: <9603041549.AA24961@toad.ig.co.uk> To: rudis+@child.prodigy.cs.cmu.edu Subject: while ( @row = $cursor->fetchrow) Cc: dbi-users@fugue.com X-Sun-Charset: US-ASCII content-length: 1243 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: rudis+@child.prodigy.cs.cmu.edu > > Mark Dedlow wrote: > > Anyone have ideas about this problem: > > > > $query = "select tname from tab"; > > $cursor = $dbh->prepare($query); > > $cursor->execute; > > while ( @row = $cursor->fetchrow) { > > print "@row\n"; > > } > > > > It works fine, but after the data prints out it goes > > on infinitely, printing blank lines. > > The problem is not with DBI/DBD/fetchrow, as the following program shows > the exact same behaviour. Figure out what's wrong with it, and you'll > have your answer. > > @a = qw(0 2 4 6 8); @b = qw(1 3 5 7 9); > sub fetchrow { $i < @a ? ($a[$i], $b[$i++]) : undef } > > while (@row = fetchrow) { print "@row\n"; } > > Output: > > 0 1 > 2 3 > 4 5 > 6 7 > 8 9 > [ and lots of blank lines ... ] Your code has a bug. If DBI/DBD/fetchrow works in the same way then it also has a bug. The bug (here) is that you should replace undef with (). An undef in a list context is a list with one (undefined) element. It's not an empty list. I do not believe that that's the problem Mark is having (assuming the code he included is the real code). Tim. p.s. It's helpful to include subject lines in your mail. Especially for people who get over 100 messages a day! ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <08795-0@oink>; Mon, 4 Mar 1996 23:27:10 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825976084:06086:0; Mon, 04 Mar 96 21:48:04 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa05094; 4 Mar 96 21:47 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id LAA25182 for dbi-users-real; Mon, 4 Mar 1996 11:30:34 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from relay-2.mail.demon.net (disperse.demon.co.uk [158.152.1.77]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id LAA25178 for ; Mon, 4 Mar 1996 11:30:32 -0800 Received: from post.demon.co.uk ([158.152.1.72]) by relay-2.mail.demon.net id ap28591; 4 Mar 96 19:18 GMT Received: from ignite.demon.co.uk ([158.152.8.99]) by relay-3.mail.demon.net id aa08277; 4 Mar 96 19:12 GMT Received: from toad by oink with SMTP (PP) id <06293-0@oink>; Mon, 4 Mar 1996 19:12:19 +0000 Received: by toad.ig.co.uk (5.0/SMI-SVR4) id AA25424; Mon, 4 Mar 1996 19:12:11 +0000 Date: Mon, 4 Mar 1996 19:12:11 +0000 From: Tim Bunce Message-Id: <9603041912.AA25424@toad.ig.co.uk> To: dedlow@voro.lbl.gov, Jason.Stevens@chron.com Subject: Re: fetchrow goes forever Cc: dbi-users@fugue.com, mtdedlow@lbl.gov X-Sun-Charset: US-ASCII content-length: 999 Organization: Paul Ingram Group, Software Systems, +44 1 483 424424 > From: Jason.Stevens@chron.com (Jason Stevens) > > Mark Dedlow previously wrote: > > > > while ( @row = $cursor->fetchrow) { > > print "@row\n"; > > } > > > > It works fine, but after the data prints out it goes > > on infinitely, printing blank lines. > > Check this out: > > % perl -e '@foo = undef; print "foo\n" if (@foo);' > foo > > The problem is that when you're assigning undef to @foo, undef is really > being assigned to @foo[0]: > > % perl -e '@foo = "bar"; print $foo[0]' > bar > > Thus, in your while( @row = $cursor->fetchrow ) condition, @row is being > evaluated in a _scalar_ context. Since it has 1 element in it (undef), the > array evaluates to 1 in a scalar context (the number of elements in it), and > thus your loop will never terminate. You are presuming that that is the underlying problem Mark is having. I doubt that it is, fetchrow specifically returns an _empty_ list in this case. If it didn't no one would be able to use DBD::Oracle properly. Tim. ---+++--- Received: from punt2.demon.co.uk by oink with SMTP (PP) id <08795-3@oink>; Mon, 4 Mar 1996 23:27:21 +0000 Received: from punt-2.mail.demon.net by mailstore for dbperl@ig.co.uk id 825976779:14613:1; Mon, 04 Mar 96 21:59:39 GMT Received: from toccata.fugue.com ([204.254.239.2]) by punt-2.mail.demon.net id aa13852; 4 Mar 96 21:58 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id MAA25357 for dbi-users-real; Mon, 4 Mar 1996 12:25:39 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from voro.lbl.gov (voro.lbl.gov [131.243.240.19]) by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id MAA25353 for ; Mon, 4 Mar 1996 12:25:38 -0800 Received: from voro (localhost [127.0.0.1]) by voro.lbl.gov (8.6.12/G) with ESMTP id MAA25042; Mon, 4 Mar 1996 12:24:13 -0800 Message-Id: <199603042024.MAA25042@voro.lbl.gov> X-Mailer: exmh version 1.6.2 7/18/95 To: Tim Bunce cc: dbi-users@fugue.com, mtdedlow@lbl.gov Subject: Re: fetchrow goes forever In-reply-to: Your message of "Mon, 04 Mar 1996 19:12:11 GMT." <9603041912.AA25424@toad.ig.co.uk> Mime-Version: 1.0 Content-Type: text/plain; charset=us-ascii Date: Mon, 04 Mar 1996 12:24:12 -0800 From: Mark Dedlow > > Thus, in your while( @row = $cursor->fetchrow ) condition, @row is being > > evaluated in a _scalar_ context. Since it has 1 element in it (undef), the > > array evaluates to 1 in a scalar context (the number of elements in it), an d > > thus your loop will never terminate. > > You are presuming that that is the underlying problem Mark is having. > > I doubt that it is, fetchrow specifically returns an _empty_ list in > this case. If it didn't no one would be able to use DBD::Oracle properly. > > Tim. Several people pointed out to me that "@foo = undef" does not undef @foo (in fact define's it), which I knew. I never looked at the DBI source or docs to back up my assumption that fetchrow returns (), not undef, simply because this code loop has always worked before. It has also been my impression that this is the "cannonical" cursor loop: while ( @row = $cursor->fetchrow) { } However, my setup is clearly broken, since fetchrow is in fact returning undef when it should be returning (); Broken system: -> fetchrow for DBD::Oracle::st (DBI::st=HASH(0x142e3c)~0x142ed8) <- fetchrow= undef Working system: -> fetchrow for DBD::Oracle::st (DBI::st=HASH(0x12705c)~0x127164) <- fetchrow= ( ) [0 items] I don't think there were any install or test problems with perl, DBI or DBD, but I'll go back and check it out again. Mark ---+++--- Received: from punt.demon.co.uk by oink with SMTP (PP) id <08844-2@oink>; Mon, 4 Mar 1996 23:36:48 +0000 Received: from punt-1.mail.demon.net by mailstore for dbperl@ig.co.uk id 825976879:09207:0; Mon, 04 Mar 96 22:01:19 GMT Received: from relay-1.mail.demon.net ([158.152.1.140]) by punt-1.mail.demon.net id aa08592; 4 Mar 96 22:00 GMT Received: from toccata.fugue.com ([204.254.239.2]) by relay-1.mail.demon.net id aa20116; 4 Mar 96 21:57 GMT Received: (from daemon@localhost) by toccata.fugue.com (8.6.12/8.6.11) id KAA25050 for dbi-users-real; Mon, 4 Mar 1996 10:27:05 -0800 Precedence: junk Sender: owner-perldb-interest@fugue.com Received: from houston.chron.com (houston.chron.com [130.80.27.2]) by toccata.fugue.com (8.6.12/8.6.11) with SMTP id KAA25046 for ; Mon, 4 Mar 1996 10:26:58 -0800 Received: by houston.chron.com id AA21675 (5.65c/IDA-1.4.4 for ); Mon, 4 Mar 1996 12:31:01 -0600 Received: from chron.chron.com(130.80.150.56) by houston.chron.com via smap (V1.3) id sma021635; Mon Mar 4 12:30:38 1996 Received: from elmed002.magichron by relay.chron.com (4.1/SMI-4.1) id AA14214; Mon, 4 Mar 96 12:30:37 CST Received: by elmed002.magichron (4.1/SMI-4.1) id AA00218; Mon, 4 Mar 96 12:31:05 PST From: Jason Stevens Message-Id: <9603042031.AA00218@elmed002.magichron> Subject: Re: fetchrow goes forever To: Mark Dedlow Date: Mon, 4 Mar 1996 12:31:05 -0800 (PST) Cc: Tim.Bunce@ig.co.uk, dbi-users@fugue.com, mtdedlow@lbl.gov In-Reply-To: <199603041701.JAA22869@voro.lbl.gov> from "Mark Dedlow" at Mar 4, 96 09:01:02 am X-Mailer: ELM [version 2.4 PL23] Content-Type: text Content-Length: 1129 Mark Dedlow previously wrote: > > while ( @row = $cursor->fetchrow) { > print "@row\n"; > } > > It works fine, but after the data prints out it goes > on infinitely, printing blank lines. Check this out: % perl -e '@foo = undef; print "foo\n" if (@foo);' foo The problem is that when you're assigning undef to @foo, undef is really being assigned to @foo[0]: % perl -e '@foo = "bar"; print $foo[0]' bar Thus, in your while( @row = $cursor->fetchrow ) condition, @row is being evaluated in a _scalar_ context. Since it has 1 element in it (undef), the array evaluates to 1 in a scalar context (the number of elements in it), and thus your loop will never terminate. -jps -- Jason Philip Stevens Email: jstevens@chron.com WWW Programmer Voice: (713) 220-2766 Houston Chronicle Interactive Fax: (713) 217-5105 USPS: 801 Texas Avenue Just my $2E-2 Houston, TX 77002 WWW: http://www.chron.com ---+++---