Received: from punt2.demon.co.uk by oink with SMTP (PP) id <02436-3@oink>;

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 [email protected]
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: [email protected]
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 <[email protected]>; Tue, 13 Feb 1996 04:06:30 -0800
Message-Id: <[email protected]>
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 <[email protected]>
To: [email protected]
Subject: Re: DBI-Oracle & SQL*Net

> From [email protected] 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: <[email protected]>
> 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: [email protected]
> 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 <[email protected]>; 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: <[email protected]>
> X-Sender: [email protected]
> X-Mailer: Windows Eudora Light Version 1.5.2
> Mime-Version: 1.0
> Content-Type: text/plain; charset="us-ascii"
> To: [email protected]
> From: "Roman L. Podshivalov" <[email protected]>
> Subject: DBI-Oracle & SQL*Net
> Cc: [email protected]
> 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
[email protected] [email protected]

---+++---
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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" <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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" <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
Subject: Re: DBI-Oracle & SQL*Net
To: "Roman L. Podshivalov" <[email protected]>
Date: Tue, 13 Feb 1996 13:30:50 +0000 (GMT)
Cc: [email protected], [email protected]
In-Reply-To: <[email protected]> from "Roman L. Podshivalov" at Feb 13, 96 01:57:23 pm
X-Pants: ** The return address of this email should be: [email protected]
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"
[email protected] | -- 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
Subject: Re: DBI-Oracle & SQL*Net
Cc: [email protected]
X-Sun-Charset: US-ASCII
content-length: 399
Organization: Paul Ingram Group, Software Systems, +44 1 483 424424

> From: "Roman L. Podshivalov" <[email protected]>
>
> >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 [email protected]
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: [email protected]
Received: from colossus.cse.psu.edu ([email protected] [130.203.1.2])
by toccata.fugue.com (8.6.12/8.6.11) with SMTP id FAA29763
for <[email protected]>; 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" <[email protected]>
cc: [email protected]
Subject: Re: DBI-Oracle & SQL*Net
In-reply-to: Your message of "Tue, 13 Feb 1996 05:57:23 EST." <[email protected]>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Tue, 13 Feb 1996 08:15:47 -0500
From: John D Groenveld <[email protected]>
Message-Id: <[email protected]>

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
[email protected]
---+++---
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
Subject: Re: DBD with SQL*Net
Cc: [email protected]
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 <[email protected]>

> > > 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
Subject: Use of the dbi-dev mailing list
Cc: [email protected], [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
X-Sender: harle@ward
To: [email protected]
cc: [email protected]
Subject: Problems building DBI 0.66 on DG/UX
Message-ID: <Pine.SUN.3.91.960214103117.1372F-100000@ward>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
Subject: Re: Problems building DBI 0.66 on DG/UX
Cc: [email protected]
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 <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; Thu, 15 Feb 1996 09:23:26 -0800
From: [email protected]
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 [email protected] at austin.ibm.com; id AA23662;
Thu, 15 Feb 1996 11:26:08 -0600
Message-Id: <[email protected]>
X-Mailer: exmh version 1.6.2 7/18/95
To: Tim Bunce <[email protected]>
Cc: [email protected]
Subject: Re: Use of the dbi-dev mailing list
In-Reply-To: Your message of Tue, 13 Feb 96 23:33:24 +0000. <[email protected]>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Thu, 15 Feb 96 11:26:07 -0600

Tim Bunce <[email protected]> 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
[email protected] | 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Reply-To: Roman Podshivalov <[email protected]>
Subject: ora_login trough SQL*Net failed ?!
To: [email protected]
cc: [email protected]
Message-ID: <ML-2.1.824402935.113.romas@orpheus>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
From: Doug McNaught <[email protected]>
To: [email protected]
CC: [email protected]
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: [email protected] *or* [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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 <[email protected]>
>
> 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 [email protected]
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: [email protected]
Received: from colossus.cse.psu.edu ([email protected] [130.203.1.2])
by toccata.fugue.com (8.6.12/8.6.11) with SMTP id RAA05890
for <[email protected]>; 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 <[email protected]>
To: [email protected], [email protected]
Subject: Re: DBI test failure on Unixware 1.1.2, Perl 5.002gamma
Cc: [email protected]
Message-Id: <[email protected]>
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
[email protected]
---+++---
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
From: Doug McNaught <[email protected]>
To: [email protected]
CC: [email protected], [email protected]
In-reply-to: <[email protected]> (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 <[email protected]>
>Cc: [email protected]
>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: [email protected] *or* [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
Subject: DBI test failure for Perl 5.002gamma
Cc: [email protected]
X-Sun-Charset: US-ASCII
Organization: Paul Ingram Group, Software Systems, +44 1 483 424424

> From: Doug McNaught <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
Subject: DBI test failure for Perl 5.002gamma
Cc: [email protected]
X-Sun-Charset: US-ASCII
Organization: Paul Ingram Group, Software Systems, +44 1 483 424424

> From: Doug McNaught <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Reply-To: Roman Podshivalov <[email protected]>
Subject: DBI-67 & DBD-Oracle 0.28 & Oracle 7.2.2.4 on Solaris 2.4
To: [email protected]
cc: [email protected]
Message-ID: <ML-2.1.824489364.6838.romas@ariel>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
X-Sender: [email protected]
X-Mailer: Windows Eudora Light Version 1.5.2
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: [email protected]
From: "Roman L. Podshivalov" <[email protected]>
Subject: DBD-Oracle-0.28 make failed
Cc: [email protected]

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: <DBIXS.h>
"./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 [email protected]
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: [email protected]
Received: from colossus.cse.psu.edu ([email protected] [130.203.1.2])
by toccata.fugue.com (8.6.12/8.6.11) with SMTP id LAA08286
for <[email protected]>; 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 <[email protected]>
cc: [email protected]
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." <ML-2.1.824489364.6838.romas@ariel>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Fri, 16 Feb 1996 14:13:44 -0500
From: John D Groenveld <[email protected]>
Message-Id: <[email protected]>

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
[email protected]
---+++---
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
To: [email protected]
Subject: problem to install DBD(Oracle) for perl5
Message-Id: <[email protected]>
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
[email protected]
---+++---
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
From: Doug McNaught <[email protected]>
To: [email protected]
CC: [email protected]
In-reply-to: <[email protected]> (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 <[email protected]>
>Cc: [email protected]
>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: [email protected] *or* [email protected]
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 [email protected]
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: [email protected]
Received: from colossus.cse.psu.edu ([email protected] [130.203.1.2])
by toccata.fugue.com (8.6.12/8.6.11) with SMTP id UAA03431
for <[email protected]>; 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 <[email protected]>
cc: [email protected]
Subject: Re: DBI test failure for Perl 5.002gamma
In-reply-to: Your message of "Sun, 18 Feb 1996 21:42:39 EST." <[email protected]>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Sun, 18 Feb 1996 23:30:52 -0500
From: John D Groenveld <[email protected]>
Message-Id: <[email protected]>

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
[email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
Date: Mon, 19 Feb 1996 01:21:33 -0800
From: William Warner <[email protected]>
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 <[email protected]>, PerlTk <[email protected]>
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 [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
Date: Mon, 19 Feb 1996 14:01:00 +0000
From: Mark Lester <[email protected]>
Subject: long fields
To: DBI List <[email protected]>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Reply-To: Roman Podshivalov <[email protected]>
Subject: Re: ora_login trough SQL*Net failed ?!
To: Tim Bunce <[email protected]>
cc: [email protected]
In-Reply-To: <[email protected]>
Message-ID: <ML-2.1.824754574.6838.romas@ariel>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; LANGUAGE=russian

>
> > From: "Roman L. Podshivalov" <[email protected]>
> >
> > >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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Cc: [email protected], [email protected], [email protected]
From: Nick Ing-Simmons <[email protected]>
Organization: via, but not speaking for : Texas Instruments Ltd.
Subject: Re: Looking for spreadsheet like functions
References: <[email protected]>
In-Reply-To: Tim Bunce's message of Mon, 19 Feb 1996 14:44:20 +0000

In <[email protected]>
On Mon, 19 Feb 1996 14:44:20 +0000
Tim Bunce <[email protected]> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Message-Id: <v01540b06ad4e835b3ec8@[193.79.253.57]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 19 Feb 1996 21:02:07 +0100
To: [email protected]
From: [email protected] (Peter Chen)
Subject: MacPerl5 module for accessing Butler database
Cc: [email protected], [email protected]

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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected], [email protected]
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 <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
From: Doug McNaught <[email protected]>
To: [email protected]
CC: [email protected]
In-reply-to: <[email protected]> (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: [email protected]
>Mime-Version: 1.0
>Content-Type: text/plain; charset=us-ascii
>Date: Sun, 18 Feb 1996 23:30:52 -0500
>From: John D Groenveld <[email protected]>
>

>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: [email protected] *or* [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]> for [email protected];
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 <[email protected]>
Subject: DBD::MSQL 0.65pl8 aborts on INSERT, CREATE statements.
To: dbi-users <[email protected]>
Message-id: <[email protected]>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]> for [email protected];
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 <[email protected]>
Subject: DBD::MSQL gives messages about statement handles?!!?!?!!
To: dbi-users <[email protected]>
Message-id: <[email protected]>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
Subject: Re: MacPerl5 module for accessing Butler database
Cc: [email protected], [email protected]
X-Sun-Charset: US-ASCII
content-length: 1243
Organization: Paul Ingram Group, Software Systems, +44 1 483 424424

> From: [email protected] (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 [email protected]
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: [email protected]
Received: from ux4.cso.uiuc.edu ([email protected] [128.174.5.62])
by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id QAA09259
for <[email protected]>; 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 [email protected]; Tue, 20 Feb 1996 18:45:29 -0600
Date: Tue, 20 Feb 1996 18:45:29 -0600
From: DAS <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
Subject: Re: FYI: version check problem with perl5.002
Cc: [email protected]
X-Sun-Charset: US-ASCII
content-length: 1913
Organization: Paul Ingram Group, Software Systems, +44 1 483 424424

> From: Rick Tessner <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
Subject: Oracle PL/SQL function calls from DBI
Cc: [email protected]
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 <[email protected]>

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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Message-Id: <v02140b00ad50e72ab35d@[128.165.9.181]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 21 Feb 1996 08:16:25 -0700
To: Peter Chen <[email protected]>
From: Byron Palmer <[email protected]>
Subject: Re: Butperl ready for beta test
Cc: [email protected], Hanz Makmur <[email protected]>

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
[email protected] 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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Message-Id: <v01540b0aad50d25392e7@[193.78.249.177]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 21 Feb 1996 15:16:00 +0100
To: [email protected], [email protected]
From: [email protected] (Peter Chen)
Subject: Butperl ready for beta test
Cc: [email protected], [email protected] (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
[email protected]
------
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.

<http://www.hermetica.com/technologia/DBI>

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 <[email protected]>, whose original
posting on Butler-L inspired this module.

Thanks to Jeff A. Shields <[email protected]> and Douglas Getty
<[email protected]> 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 [email protected]
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: [email protected]
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 <[email protected]>; Wed, 21 Feb 1996 09:04:17 -0800
Received: from DECNET-MAIL (OLIVERS@WP57) by wl.aecl.ca (PMDF V4.3-13 #8870)
id <[email protected]>;
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" <[email protected]>
Subject: unsubscribe
To: [email protected]
Message-id: <[email protected]>
X-VMS-To: WL::IN%"[email protected]"
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
X-Sender: harle@ward
To: [email protected]
cc: [email protected]
Subject: Problems building DBD Oracle on DG/UX
Message-ID: <Pine.SUN.3.91.960221165206.1660I-100000@ward>
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 [email protected]
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: [email protected]
Received: from zu.zdk.com ([email protected] [199.183.114.2])
by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id MAA00823
for <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
Subject: persistant connect/login handles
To: [email protected]
Date: Wed, 21 Feb 1996 16:02:15 -0500 (EST)
Cc: [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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 <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 [email protected]; Wed, 21 Feb 1996 23:26:16 GMT
From: Alligator Descartes <[email protected]>
Message-Id: <[email protected]>
Subject: ANNOUNCE ( Of sorts ): DBD-Informix-0.20pl1
To: [email protected]
Date: Wed, 21 Feb 1996 23:26:15 +0000 (GMT)
X-Pants: ** The return address of this email should be: [email protected]
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
<insert your favourite bugbear> 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"
[email protected] | -- 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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected] (Michael Peppler)
Message-Id: <[email protected]>
To: [email protected]
Subject: Re: persistant connect/login handles
Cc: [email protected]

> From: Ron Schmidt <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Message-Id: <v01540b1cad51f2f0769b@[193.78.249.177]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Thu, 22 Feb 1996 13:34:21 +0100
To: [email protected], [email protected]
From: [email protected] (Peter Chen)
Subject: beta Butperl to be released via web
Cc: [email protected]

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 <[email protected]>, 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
[email protected]

---+++---
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected],
[email protected]
Subject: Re: Butperl ready for beta test
Cc: [email protected], [email protected]
X-Sun-Charset: US-ASCII
content-length: 805
Organization: Paul Ingram Group, Software Systems, +44 1 483 424424

> To: [email protected], [email protected]
Can't reply to ^^^^^^^^^^^^^^^^^^^^^^^^^^^^^

> From: [email protected] (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 <foo>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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
Subject: Re: ANNOUNCE ( Of sorts ): DBD-Informix-0.20pl1
To: [email protected] (Tim Bunce)
Date: Thu, 22 Feb 1996 15:20:47 +0000 (GMT)
Cc: [email protected], [email protected]
In-Reply-To: <[email protected]> from "Tim Bunce" at Feb 22, 96 10:33:30 am
X-Pants: ** The return address of this email should be: [email protected]
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"
[email protected] | -- 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
Subject: Re: Informix DBD for Perl5 on hpux
To: [email protected] (Tony G. Peterman)
Date: Thu, 22 Feb 1996 15:25:09 +0000 (GMT)
Cc: [email protected]
In-Reply-To: <[email protected]> from "Tony G. Peterman" at Feb 22, 96 09:29:11 am
X-Pants: ** The return address of this email should be: [email protected]
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"
[email protected] | -- 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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 <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; Fri, 23 Feb 1996 01:34:08 -0800
From: [email protected]
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: <[email protected]>
To: [email protected]
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: [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>; Fri, 23 Feb 1996 12:51:39 GMT
Message-Id: <[email protected]>
Date: Fri, 23 Feb 1996 14:00:00 +0000
From: Mark Lester <[email protected]>
Subject: long fields & stored procs
To: DBI List <[email protected]>
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 = <A BIG NUMBER>;
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 [email protected]
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: [email protected]
Received: from ux4.cso.uiuc.edu ([email protected] [128.174.5.62])
by toccata.fugue.com (8.6.12/8.6.11) with ESMTP id HAA03402
for <[email protected]>; 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 [email protected]; Fri, 23 Feb 1996 09:41:52 -0600
Date: Fri, 23 Feb 1996 09:41:52 -0600
From: DAS <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Message-Id: <ad53c0d1010210045d13@[205.163.51.232]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: [email protected]
From: [email protected] (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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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: [email protected] (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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Reply-To: Roman Podshivalov <[email protected]>
Subject: Re: ora_login trough SQL*Net failed ?!
To: Tim Bunce <[email protected]>
cc: [email protected]
In-Reply-To: <[email protected]>
Message-ID: <ML-2.1.825354697.6838.romas@chronos>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
To: Roman Podshivalov <[email protected]>
Cc: Tim Bunce <[email protected]>, [email protected]
Subject: Re: ora_login trough SQL*Net failed ?!
In-Reply-To: <ML-2.1.825354697.6838.romas@chronos>
Message-Id: <[email protected]>
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 <[email protected]>
> To: Tim Bunce <[email protected]>
> Cc: [email protected]
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Message-Id: <v01540b00ad5783298fbc@[193.79.253.62]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Mon, 26 Feb 1996 18:59:28 +0100
To: [email protected], [email protected]
From: [email protected] (Peter Chen)
Subject: Butler module released
Cc: [email protected]

Butler Module for Perl has been released. I have set up a Butler Module
home page where you can download the package.

<http://www.math.rutgers.edu/~petechen/Butler/Butlerpm.html>

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
[email protected]
-----
README for Perl Butler Module

by Peter Chen <[email protected]>, 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
<[email protected]> pointed out).

<http://www.hermetica.com/technologia/DBI>

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 <[email protected]>, whose original
posting on Butler-L inspired this module.

Thanks to Jeff A. Shields <[email protected]> and Douglas Getty
<[email protected]> from Everyware for their great technical/sales
support.

Thanks to Butler product manager, Don J. Reith <[email protected]> for
giving me the permission to distribute Butler.XFCN, copyright 1994
Everyware Development.

Thanks to Tim Bunce <[email protected]> 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
<[email protected]>.

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 <[email protected]> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Reply-To: Roman Podshivalov <[email protected]>
Subject: Re: ora_login trough SQL*Net failed ?!
To: Tim Bunce <[email protected]>
cc: [email protected]
In-Reply-To: <[email protected]>
Message-ID: <ML-2.1.825354697.6838.romas@chronos>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Message-Id: <ad574f330a02100442cf@[205.163.51.232]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: Tim Bunce <[email protected]>
From: [email protected] (Jake Donham)
Subject: Re: Oraperl doesn't return undef on error inside of eval
Cc: [email protected]

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: [email protected] (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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
Subject: Re: ora_login trough SQL*Net failed ?!
Cc: [email protected]
X-Sun-Charset: US-ASCII
content-length: 411
Organization: Paul Ingram Group, Software Systems, +44 1 483 424424

> From: Jim Wiese <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
Subject: Re: Oraperl doesn't return undef on error inside of eval
Cc: [email protected], [email protected]
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: [email protected] (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: [email protected] (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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Reply-To: Roman Podshivalov <[email protected]>
Subject: Any1 use DBD-Oracle with Oracle 7.2.2.4 (exactly) on Solaris 2.4 ?
To: [email protected]
Message-ID: <ML-2.1.825443792.6838.romas@ariel>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected] (William Warner)
Message-Id: <[email protected]>
To: [email protected]
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 [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Message-Id: <ad591f97220210045eb4@[205.163.51.232]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: Tim Bunce <[email protected]>
From: [email protected] (Jake Donham)
Subject: Re: Oraperl doesn't return undef on error inside of eval
Cc: [email protected], [email protected]

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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
Subject: Executing stored procedures via DBD/DBI
Cc: [email protected]
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 <[email protected]>

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 [email protected]
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: [email protected]
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 <[email protected]>; 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: [email protected]
Message-Id: <ad593058240210044e55@[205.163.51.232]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
To: Tim Bunce <[email protected]>
From: [email protected] (Jake Donham)
Subject: Re: Executing stored procedures via DBD/DBI
Cc: [email protected], [email protected]

>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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
To: [email protected], [email protected]
Subject: ANNOUNCE: FreeODBC Driver Pack Project
Message-ID: <[email protected]>
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 ([email protected]). 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
[email protected], it may take a few days to be processed).

Brian Jepson ([email protected])
---===[[[@>>> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>;
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 <[email protected]>;
Wed, 28 Feb 1996 11:55:19 -0500 (EST)
Message-Id: <v03005101ad5a3880c289@[3.47.36.32]>
Mime-Version: 1.0
Content-Type: text/plain; charset="us-ascii"
Date: Wed, 28 Feb 1996 11:53:58 -0500
To: [email protected]
From: Bob Snyder <[email protected]>
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]> for [email protected];
Wed, 28 Feb 1996 18:37:49 +0000 (GMT)
Date: Wed, 28 Feb 1996 18:37:49 +0000 (GMT)
From: "D.S. McNicholl" <[email protected]>
Subject: Beginer Help ?
To: [email protected]
Message-id: <[email protected]>
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: [email protected]
'@ 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 [email protected]
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: [email protected]
Received: from colossus.cse.psu.edu ([email protected] [130.203.1.2])
by toccata.fugue.com (8.6.12/8.6.11) with SMTP id NAA09562
for <[email protected]>; 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" <[email protected]>
cc: [email protected]
Subject: Re: Beginer Help ?
In-reply-to: Your message of "Wed, 28 Feb 1996 13:37:49 EST." <[email protected]>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Wed, 28 Feb 1996 16:44:40 -0500
From: John D Groenveld <[email protected]>
Message-Id: <[email protected]>

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
[email protected]

---+++---
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Subject: Oracle DBD error messages
To: [email protected]
X-Mailer: Chameleon ENGP1, TCP/IP for Windows, NetManage Inc.
Message-ID: <[email protected]>
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<br>";
$rv = $cursor->execute;
$cursor->finish;
print $rv ? "Record inserted.<br>" :
"Database error: $DBD::Oracle::errstr<br>";

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: [email protected]
-----------------------------------------------------------------

---+++---
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
From: Michael Karafotis <[email protected]>
To: [email protected]
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 [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; Thu, 29 Feb 1996 07:50:56 -0800
From: [email protected]
Received: by gateway1.srs.gov id AA10179 (InterLock SMTP Gateway 3.0
for [email protected]); Thu, 29 Feb 1996 10:55:18 -0500
Message-Id: <[email protected]>
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: [email protected]
Subject: Re: ANNOUNCE: FreeODBC Driver Pack Project
Cc: [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
X-Sender: [email protected]
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: [email protected]
From: "Brian L. Swett" <[email protected]>
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://[email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
From: [email protected] (Michael Karafotis)
To: John D Groenveld <[email protected]>
Cc: [email protected] (Michael Karafotis), [email protected]
Subject: Re: ORACLE_HOME Problem
In-Reply-To: <[email protected]>
References: <[email protected]> <[email protected]>

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 [email protected]

jdg> --
______________________________________________________________________________
Michael Karafotis [email protected]
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 [email protected]
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: [email protected]
Received: from colossus.cse.psu.edu ([email protected] [130.203.1.2])
by toccata.fugue.com (8.6.12/8.6.11) with SMTP id JAA12176
for <[email protected]>; 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 <[email protected]>
cc: [email protected]
Subject: Re: ORACLE_HOME Problem
In-reply-to: Your message of "Thu, 29 Feb 1996 10:37:00 EST." <[email protected]>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Thu, 29 Feb 1996 12:33:07 -0500
From: John D Groenveld <[email protected]>
Message-Id: <[email protected]>

> 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
[email protected]

---+++---
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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" <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; Fri, 1 Mar 1996 05:42:07 -0800
From: [email protected]
Received: by gateway1.srs.gov id AA15420 (InterLock SMTP Gateway 3.0
for [email protected]); Fri, 1 Mar 1996 08:46:03 -0500
Message-Id: <[email protected]>
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: [email protected], [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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" <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
To: [email protected]
cc: [email protected]
Subject: Re: ANNOUNCE: FreeODBC Driver Pack Project
In-Reply-To: <[email protected]>
Message-ID: <[email protected]>
MIME-Version: 1.0
Content-Type: TEXT/PLAIN; charset=US-ASCII

On Thu, 29 Feb 1996 [email protected] 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 ([email protected])
---===[[[@>>> 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 [email protected]
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: [email protected]
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 <[email protected]>; Fri, 1 Mar 1996 09:38:50 -0800
Received: from porky.boxtop.com by underground.net with smtp id m0tsYrT-001eeSC;
( Smail #1) for <[email protected]>; Fri, 1 Mar 96 09:43 PST
Received: by porky.boxtop.com with Microsoft Mail
id <[email protected]>;
Fri, 1 Mar 1996 09:43:14 -0800
Message-ID: <[email protected]>
From: Analyn Sales <[email protected]>
To: "'[email protected]'" <[email protected]>
Cc: "'[email protected]'" <[email protected]>
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

[email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]> for [email protected];
Sun, 03 Mar 1996 16:08:11 +0000 (GMT)
Date: Sun, 03 Mar 1996 16:08:11 +0000 (GMT)
From: "D.S. McNicholl" <[email protected]>
Subject: Installation.
To: [email protected]
Message-id: <[email protected]>
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: [email protected]
'@ 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 [email protected]
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: [email protected]
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 <[email protected]>; Fri, 1 Mar 1996 12:43:10 -0800
Received: from tammy.boxtop.com by underground.net with smtp id m0tsbjw-001ef4C;
( Smail #1) for <[email protected]>; Fri, 1 Mar 96 12:47 PST
Received: by tammy.boxtop.com with Microsoft Mail
id <[email protected]>;
Fri, 1 Mar 1996 12:45:10 -0800
Message-ID: <[email protected]>
From: Tammy McKean <[email protected]>
To: "'[email protected]'" <[email protected]>
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:[email protected]]
Sent: Friday, March 01, 1996 9:43 AM
To: '[email protected]'
Cc: '[email protected]'
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

[email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]> for [email protected];
Fri, 01 Mar 1996 21:09:11 +0000 (GMT)
Date: Fri, 01 Mar 1996 21:09:11 +0000 (GMT)
From: "D.S. McNicholl" <[email protected]>
Subject: Compiling
To: [email protected]
Message-id: <[email protected]>
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: [email protected]
'@ 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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
From: Andreas Koenig <[email protected]>
To: [email protected]
CC: [email protected]
In-reply-to: <[email protected]> ([email protected])
Subject: Re: Compiling
Reply-to: [email protected]

>>>>> "david" == "D S McNicholl" <[email protected]> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>;
Sun, 3 Mar 1996 23:30:37 -0800
Message-Id: <[email protected]>
X-Mailer: exmh version 1.6.2 7/18/95
Reply-to: [email protected]
To: [email protected]
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 <[email protected]>

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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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 <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; Mon, 4 Mar 1996 06:02:44 -0800
From: [email protected]
Message-Id: <[email protected]>
Date: Mon, 4 Mar 96 9:07:53 EST
Apparently-To: <[email protected]>

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 [email protected]
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: [email protected]
Received: from gwdu42.gwdg.de ([email protected] [134.76.10.26])
by toccata.fugue.com (8.6.12/8.6.11) with SMTP id KAA25020
for <[email protected]>; 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: <[email protected]>
Date: Mon, 04 Mar 1996 19:22:02 +0100
From: bbeilke <[email protected]>
X-Mailer: Mozilla 2.0 (Win95; I)
MIME-Version: 1.0
To: [email protected]
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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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: [email protected]
>
> > 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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
X-Mailer: exmh version 1.6.2 7/18/95
To: Tim Bunce <[email protected]>
cc: [email protected], [email protected]
Subject: Re: fetchrow goes forever
In-reply-to: Your message of "Mon, 04 Mar 1996 13:21:05 GMT." <[email protected]>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Mon, 04 Mar 1996 09:01:02 -0800
From: Mark Dedlow <[email protected]>

> > From: Mark Dedlow <[email protected]>
> >
> > 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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
X-Mailer: exmh version 1.6.2 7/18/95
To: "Rujith S. de Silva" <[email protected]>
cc: [email protected], [email protected]
Subject: Re: fetchrow goes forever
In-reply-to: Your message of "Mon, 04 Mar 1996 08:57:39 EST." <[email protected]>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Mon, 04 Mar 1996 09:55:13 -0800
From: Mark Dedlow <[email protected]>

> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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" <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
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 <[email protected]>
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected]
Subject: while ( @row = $cursor->fetchrow)
Cc: [email protected]
X-Sun-Charset: US-ASCII
content-length: 1243
Organization: Paul Ingram Group, Software Systems, +44 1 483 424424

> From: [email protected]
>
> 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 [email protected]
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: [email protected]
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 <[email protected]>; 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 <[email protected]>
Message-Id: <[email protected]>
To: [email protected], [email protected]
Subject: Re: fetchrow goes forever
Cc: [email protected], [email protected]
X-Sun-Charset: US-ASCII
content-length: 999
Organization: Paul Ingram Group, Software Systems, +44 1 483 424424

> From: [email protected] (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 [email protected]
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: [email protected]
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 <[email protected]>; 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: <[email protected]>
X-Mailer: exmh version 1.6.2 7/18/95
To: Tim Bunce <[email protected]>
cc: [email protected], [email protected]
Subject: Re: fetchrow goes forever
In-reply-to: Your message of "Mon, 04 Mar 1996 19:12:11 GMT." <[email protected]>
Mime-Version: 1.0
Content-Type: text/plain; charset=us-ascii
Date: Mon, 04 Mar 1996 12:24:12 -0800
From: Mark Dedlow <[email protected]>

> > 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 [email protected]
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: [email protected]
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 <[email protected]>; Mon, 4 Mar 1996 10:26:58 -0800
Received: by houston.chron.com id AA21675 (5.65c/IDA-1.4.4
for <[email protected]>); 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 <[email protected]>
Message-Id: <[email protected]>
Subject: Re: fetchrow goes forever
To: Mark Dedlow <[email protected]>
Date: Mon, 4 Mar 1996 12:31:05 -0800 (PST)
Cc: [email protected], [email protected], [email protected]
In-Reply-To: <[email protected]> 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: [email protected]
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
---+++---