PEPPLER.ORG
Michael Peppler
Sybase Consulting
Menu
Home
Sybase on Linux
Install Guide for Sybase on Linux
General Sybase Resources
General Perl Resources
Freeware
Sybperl
Sybase::Simple
DBD::Sybase
BCP Tool
Bug Tracker
Mailing List Archive
Downloads Directory
FAQs
Sybase on Linux FAQ
Sybperl FAQ
Personal
Michael Peppler's resume

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