Как мне подключиться с Perl к SQL Server?

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

#!/usr/bin/perl -w
use strict;

use DBI;

my $data_source = q/dbi:ODBC:192.168.3.137/;
my $user = q/bharani/;
my $password = q/123456/;

# Connect to the data source and get a handle for that connection.
my $dbh = DBI->connect($data_source, $user, $password)
    or die "Can't connect to $data_source: $DBI::errstr";

Моя ошибка:

DBI connect('192.168.3.137','bharani',...) failed: [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified (SQL-IM002) at my sqlconnect.pl line 14
Can't connect to dbi:ODBC:192.168.3.137: [Microsoft][ODBC Driver Manager] Data source name not found and no default driver specified (SQL-IM002) at mysqlconnect.pl line 14.

SQL-сервер работает в другой системе, я просто пытаюсь установить соединение с указанными выше данными. Пожалуйста, скажите мне, следует ли мне сгибать DSN в моей системе, или что-то отсутствует в моей программе?

10
задан John Saunders 20 February 2011 в 20:44
поделиться