perl访问sybase等数据库
2019独角兽企业重金招聘Python工程师标准>>>
一、配置 sybase环境
这里sybase安装目录为/opt/sybase
#
# SAP Product Environment variables
#
SAP_JRE7_32="/opt/sybase/shared/SAPJRE-7_1_027_32BIT"
export SAP_JRE7_32
SAP_JRE7="/opt/sybase/shared/SAPJRE-7_1_027_64BIT"
export SAP_JRE7
SAP_JRE7_64="/opt/sybase/shared/SAPJRE-7_1_027_64BIT"
export SAP_JRE7_64
SYBASE_OCS="OCS-16_0"
export SYBASE_OCS
INCLUDE="/opt/sybase/OCS-16_0/include":$INCLUDE
export INCLUDE
LIB="/opt/sybase/OCS-16_0/lib":$LIB
export LIB
PATH="/opt/sybase/OCS-16_0/bin":$PATH
export PATH
#
# Replace lib, lib3p, and lib3p64 with devlib, devlib3p, and devlib3p64 when debugging
#
LD_LIBRARY_PATH="/opt/sybase/OCS-16_0/lib:/opt/sybase/OCS-16_0/lib3p64:/opt/sybase/OCS-16_0/lib3p":$LD_LIBRARY_PATH
export LD_LIBRARY_PATH
LD_LIBRARY_PATH="/opt/sybase/DataAccess/ODBC/lib":$LD_LIBRARY_PATH
export LD_LIBRARY_PATH
LD_LIBRARY_PATH="/opt/sybase/DataAccess64/ODBC/lib":$LD_LIBRARY_PATH
export LD_LIBRARY_PATH
SYBASE="/opt/sybase"
export SYBASE
SYBASE_ASE="ASE-16_0"
export SYBASE_ASE
PATH="/opt/sybase/ASE-16_0/bin:/opt/sybase/ASE-16_0/install":$PATH
export PATH
SYBROOT="/opt/sybase"
export SYBROOT
SYBASE_JRE_RTDS="/opt/sybase/shared/SAPJRE-7_1_027_64BIT"
export SYBASE_JRE_RTDS
LD_LIBRARY_PATH="/opt/sybase/ASE-16_0/lib":$LD_LIBRARY_PATH
export LD_LIBRARY_PATH
SYBASE_WS="WS-16_0"
export SYBASE_WS
PATH="/opt/sybase/ASE-16_0/jobscheduler/bin":$PATH
export PATH
把上面这段加到~/.bashrc
二、安装 DBI
wget https://cpan.metacpan.org/authors/id/T/TI/TIMB/DBI-1.636.tar.gz
tar zxvf DBI-1.636.tar.gz
cd DBI-1.636
perl Makefile.PL
make
sudo make install
三、安装DBD-Sybase
wget http://www.cpan.org/authors/id/M/ME/MEWP/DBD-Sybase-1.15.tar.gz
tar zxvf DBD-Sybase-1.15.tar.gz
cd DBD-Sybase-1.15
perl Makefile.PL
make
sudo make install
四、安装其他DBD模块注意
DBD-pg需要设置POSTGRES_HOME、POSTGRES_INCLUDE、POSTGRES_LIB等环境变量
DBD-mysql需提供mysql_config路径,如:
perl Makefile.PL --mysql_config=/opt/mysql/bin/mysql_config
DBD-db2需要配置export DB2_HOME=/home/db2inst1/sqllib,DBD-Oracle需要配置ORACLE_HOME
等,总之编译安装DBD模块前要告知数据库服务器安装的位置
五、测试代码(需修改服务名、数据库名、用户名、密码、表名等对应你的数据库环境)
#!/usr/bin/perluse DBI;
use DBD::Sybase; $dbname="your-db";
$user="your-user";
$passwd="your-passwd";$dsn = "DBI:Sybase:server=MYMOTIFVOSTRO145480;database=$dbname";$dbh = DBI->connect($dsn,$user,$passwd) or die "can't connect to database : $DBI::errstr";$sth=$dbh->prepare("select * from your-table");
$sth->execute;
while (@recs=$sth->fetchrow_array) {
print $recs[0].":".$recs[1].":".$recs[2]."\n";
}
$dbh->disconnect;
六、ODBC方式
安装DBD-ODBC,wget http://www.cpan.org/authors/id/M/MJ/MJEVANS/DBD-ODBC-1.56.tar.gz
安装过程和上面类似
配置sybase的odbc驱动
/etc/odbcinst.ini追加
[sybase]
Description = Sybase
Driver = /opt/sybase/DataAccess/ODBC/lib/libsybdrvodb.so
Driver64 = /opt/sybase/DataAccess64/ODBC/lib/libsybdrvodb.so
FileUsage = 1
/etc/odbc.ini追加
[sybtestdb]
Description = Sybase ODBC Data Source
Driver = sybase
Server = localhost
Port = 5000
Database = your-db
ServerName = your-srvname
UserID = your-user
Password = your-passwd
测试代码
#!/usr/bin/perluse DBI;
use DBD::ODBC;
#sybtestdb 字串对应于 /etc/odbc.ini 里面的 [DSN]
$dsn = "DBI:ODBC:sybtestdb";$dbh = DBI->connect($dsn) or die "can't connect to database : $DBI::errstr";
$sth=$dbh->prepare("select * from you-table");
$sth->execute;$sth->{'LongTruncOk'} = 1;
while (@recs=$sth->fetchrow_array) {print $recs[0].":".$recs[1].":".$recs[2]."\n";
}
$dbh->disconnect;
转载于:https://my.oschina.net/u/2245781/blog/1162441
perl访问sybase等数据库相关推荐
- VB连接Sql Server,Oracle,SyBase,Access数据库操作实例
- VB连接数据库是常用的操作 对于小型数据的存取是非常不错的.在设计时 对于不同数据的连接方式都不同 这里使用了ADODB连接字符串的方式来访问常见的数据库:Sql Server,Oracle,Sy ...
- [wayfarer]PetShop数据访问层之数据库访问设计
原文地址: http://www.cnblogs.com/wayfarer/archive/2006/04/21/381315.html <解剖PetShop>系列之二 二.PetShop ...
- mysql 命令行访问_Mysql 命令行模式访问操作mysql数据库操作
使用环境 在cmd模式下输入 mysql --version (查看mysql安装的版本). 完整的命令可以通过mysql --help来获取. 本测试使用的Mysql版本是mysql5, 本测试使用 ...
- 使用isql连接Sybase ASE数据库的常见错误及处理方式
使用isql连接Sybase ASE数据库 Sybase ASE客户端工具中有一个比较实用的命令行工具isql.利用isql可以对ASE数据库服务器进行几乎所有的管理维护工作. 下面用isql工具连接 ...
- 用perl访问Oracle
1)在安装CPAN前,需要首先安装Oracle-Client. 2)安装好Oracle-Client后,要配置tnsnames.ora.用sqlplus测试一下确实可以访问到这个Oracle实例. 3 ...
- 数据库本地服务器为空,本地搭建的服务器访问不到数据库数据
请问下按照老师的文档把本地服务器运行起来了,网页能出现Hello world,IDEA也链接上数据库了,但是为什么用接口访问不到数据库的数据 访问本地 http://192.168.1.102:808 ...
- perl unload gbk oracle 数据库
perl unload gbk Oracle 数据库use Encode; if ( $#ARGV < 0 ){print "请输入一个文件\n";exit(-1);}$va ...
- Serverless 解惑——函数计算如何访问 SQL Server 数据库
函数计算(Function Compute):函数计算 是事件驱动的全托管计算服务.使用函数计算,您无需采购与管理服务器等基础设施,只需编写并上传代码.函数计算为您准备好计算资源,弹性地可靠地运行任务 ...
- VB访问SQL Server数据库技术全揭密
VB访问SQL Server数据库技术全揭密 2006-08-03 05:00作者:出处:电子技术责任编辑:方舟 摘 要: 本文讨论了Visual Basic应用程序访问SQL Server数据库的几 ...
最新文章
- 计算机网络应用基础 王建珍,计算机网络应用基础
- ML基石_14_Regularization
- OC基础之访问修饰符
- 用ModSecurity+PhantomJS进行服务器端XSS攻击检测
- Python版基于递归的冒泡排序算法
- 用VBScript实现Zip压缩目录中的所有文件
- python网络爬虫学习笔记(九):Beautiful Soup的使用
- php 网贷 源码,thinkphp仿百度钱包网贷借款源码
- Visual Studio2010打开界面文件时报错:“未在此计算机上注册activex控件{648A5600-2C6E-101B-82B6-000000000014}”
- thinkpad 自带软件的设置
- java获取字符长度和字节长度
- SpringBoot文件夹压缩下载实现示例
- Android进阶——性能优化之APP启动速度优化实战总结(三)
- linux审计工具audit,Linux audit安全审计工具
- SharpDevelop安装与配置
- 三维空间图像轮廓 c语言,三维模型轮廓线抽取算法.doc
- ESP32开发之旅——人体感应传感器HC-SR501
- 金融风控指标:WOE, IV, KS,LIFT值和PSI
- android框架服务 恶意软件,Android平台各类恶意软件及病毒概览
- TSINGSEE青犀视频监控技术在城市轨道交通中的应用