¿Cómo me conecto con Perl a SQL Server?

Question

Tengo una identificación de usuario, una contraseña, el nombre de la base de datos y los datos del recurso. Quiero conectarme con Perl a un servidor MSSQL. Acabo de usar el siguiente fragmento, pero me aparece un error.

#!/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"; 

Mi error es:

servidor

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. 

El SQL se ejecuta en otro sistema, sólo estoy tratando de conectar con los detalles anteriores. Dígame, ¿debo aumentar DSN en mi sistema, o falta algo en mi programa?

Answer 1

Todo lo que sigue a 'dbi:ODBC:' en su cadena de conexión se pasa al controlador ODBC. Para MSSQL, prueba esta cadena de conexión:

DBI->connect("dbi:ODBC:Driver={SQL Server};Server=192.168.3.137;UID=$user;PWD=$password") 

se pueden encontrar algunos más alternativas en connectionstrings.com