Как я могу подключиться к Sybase с помощью Perl? - PullRequest
Новая
       26

Как я могу подключиться к Sybase с помощью Perl?

3 голосов
/ 27 мая 2010

Я пытаюсь использовать хороший модуль Perl для подключения к базе данных Sybase.

Мой поиск в Google заставил меня видеть sybperl как возможный выбор, но он не обновлялся с 2005 года.

Ответы [ 3 ]

11 голосов
/ 27 мая 2010

Используйте DBD :: Sybase (через DBI). Я регулярно использую это с FreeTDS для подключения к SQL Server, но на самом деле оно написано для интерфейса CT-Lib для Sybase.

1 голос
/ 27 мая 2010

Я нашел DBD :: Sybase лучший модуль для использования в Sysbase DB и Sybase :: DBlib - API Sybase DB-Library.

0 голосов
/ 20 октября 2015

Вот как вы подключаетесь с помощью perl с ODBC к sybase в linux (64 бит) -

Установите Sybase Open Client и драйвер ODBC. (Вы можете получить эти два из ASE SDK или из установки сервера ASE)

Вам нужен менеджер драйверов odbc, я пробовал с unixODBC

Определить конфигурацию драйвера как - 

[Adaptive Server Enterprise]
Description = Sybase ODBC Driver
Driver = /sybase/DataAccess64/ODBC/lib/libsybdrvodb.so
FileUsage = -1

Вот пример Perl - 

#!/usr/bin/perl

use strict;
use DBI;
use DBD::ODBC;

BEGIN {
 $ENV{SYBASE}   = "/sybase";
}
my $user = "";
my $passwd = "";
my $server = "";
my $database = "pubs1";
my $port = "5000";
my $data_source = "DBI:ODBC:DRIVER={Adaptive Server Enterprise};server=$server;port=$port;database=$database;";
my @drivers = DBI->available_drivers;
print join(", ", @drivers), "\n";
my $dbh = DBI->connect($data_source, $user, $passwd)
or die "Can't connect to $data_source: $DBI::errstr";
my $statement = "SELECT * FROM <table_name>";
my @row = $dbh->selectrow_array($statement);
print "@row\n";
$dbh->disconnect;

Подробные инструкции см. - http://kapilraju.tumblr.com/post/131288341356/connect-to-sybase-using-perl-odbc

...