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: Michael Peppler <mpeppler at peppler dot org>
Subject: sybperl 2.13_08 (BLK routines)
Date: Oct 2 2001 4:14PM

I've just placed sybperl 2.13_08 on http://www.peppler.org/downloads
For those who are interested this version adds a few of the blk_*()
calls so that you can use the Client Library Bulk-Copy API to copy
data from perl variables to Sybase tables. The API goes something like
this:

my $dbh = new Sybase::CTlib $user, $pwd, $server, $appname,
	      { CON_PROPS => { CS_BULK_LOGIN => CS_TRUE }};

$dbh->blk_init("testdb..blk_test", 4, 0);  # blk_test has 4 colums
$dbh->blk_rowxfer(["one", 123, 456.76, "some other data"]);
.... add other rows with blk_rowxfer()....
$dbh->blk_done(Sybase::CTlib::CS_BLK_ALL, $rows);
print "Transfered $rows rows\n";
$dbh->blk_drop;

There are no doubt bugs with this stuff - in particular I haven't
really validated identity column handling, so use with care!

Michael
-- 
Michael Peppler - Data Migrations Inc. - http://www.mbay.net/~mpeppler
mpeppler@peppler.org - mpeppler@mbay.net
International Sybase User Group - http://www.isug.com