|
|
sybperl-l Archive
Up Prev Next
From: bpm at terraweb dot com (Brian P Millett)
Subject: problems with DBlib 2.04
Date: Mar 9 1996 2:19AM
(Sybase11, Sybperl 2.04, Solaris 2.4, sparc 20, perl 5.002)
Hello,
I've ran into a problem with DBlib for 2.04. The results from
dbnextrow are broken. This is the results from 2.03: (script to follow)
Sybperl Version 2.03
Sql used=select carrier_id, description from Carriers order by carrier_id
1 Carrier 1
50002 AT&T
50003 MCI
This is the results from 2.04: (script to follow)
Sybperl Version 2.04
Sql used=select carrier_id, description from Carriers order by carrier_id
1 Carrier 1
50002 AT&T
50003
MCI
--
This is the script:
#!/opt/gnu/bin/perl
# @(#)dblib.t 1.8 8/7/95
use Sybase::DBlib;
print "Sybperl Version $SybperlVer\n";
dbmsghandle ("message_handler"); # Some user defined error handlers
dberrhandle ("error_handler");
# Find the passwd file:
$Uid = "xxx"; # of course I won't show that!!
$Pwd = "xxx"; # of course I won't show that!!
$db_obj = Sybase::DBlib->dblogin($Uid, $Pwd);
db_obj->dbuse('www');
print "Sql used=select carrier_id, description from Carriers order by carrier_id\n";
$results = $db_obj->sql("select carrier_id, description from Carriers order by carrier_id"
, sub { print "@_\n"; });
---
Not much of a script, but the results show the problem. The dbnextrow
in $db_obj->sql returns a very large array. I did a diff of DBlib.xs
for 2.03 & 2.04 but there was too many differences for me to grok.
Any idea???
Thanks
---
Brian Millett
Technology Applications Inc. "Heaven can not exist,
(314) 530-1981 If the family is not eternal"
bpm@techapp.com F. Ballard Washburn
|
