develop:perl:mssql

차이

문서의 선택한 두 판 사이의 차이를 보여줍니다.

차이 보기로 링크

--- develop:perl:mssql [2008/07/06 12:39] – 새로 만듬 starlits
+++ develop:perl:mssql [2025/10/03 22:30] (현재) – 바깥 편집 127.0.0.1
@@ 줄 1: / 줄 1: @@
-====== Debian Linux에서 MS SQL Server 접근하기 ======
+====== Perl을 이용하여 MS SQL Server 연동하기 ======
-===== 설치하기 =====
+===== Installation =====
 ==== FreeTDS 설치하기 ====
+=== apt로 설치하기 ===
+  - freetds-common 과 freetds-dev 를 설치해 준다.<code> # apt-get install freetds-common freetds-dev</code>
+=== source로 설치하기(순서) ===
   - 다운로드
   - 압축해제
@@ 줄 10: / 줄 14: @@
   - make install
 ==== Sybase 펄모듈 설치하기 ====
-  - sybase 펄모듈 설치 \\ <code>$ apt-get install libdbd-sybase-perl </code>
+  - sybase 펄모듈 설치 \\ <code>$ apt-get install libdbd-sybase-perl libdbd-odbc-perl </code>
+===== Configuration =====
+  - freetds.conf 파일은 연다.
+    - 데비안 패키지인 경우에는 /etc/freetds/freetds.conf 이며, 소스로 설치되어 있을 경우에는 소스 설정 경로는 참조한다.
+  - 필요한 경우에만 아래의 주석을 해제한다. <code>
+try server login = yes
+try domain login = no
+tds version = 7.0
+</code>
+  - 맨 아래 부분에 Microsoft SQL Server 설정을 한다. <code>
+[admindb]
+        host = 192.168.100.2
+        port = 1433
+        tds version = 8.0
+</code>
+  - 설정이 정상적으로 되었는지 command-line 툴인 tsql 을 이용하여 확인한다. <code>
+$ tsql -S admindb -U mssql_username
+$ tsql -S admindb -U mssql_username -P mssql_password
+</code>
+===== Example =====
+  - 샘플소스를 만들어보자 <code perl>
+#!/usr/bin/perl
+use DBI;
+$dsn = 'DBI:Sybase:server=admindb';
+my $dbh = DBI->connect($dsn, "mssql_username", "mssql_password");
+  die "unable to connect to server $DBI::errstr" unless $dbh;
+$dbh->do("use mssql_database");
+$query = "SELECT * FROM scott";
+$sth = $dbh->prepare ($query) or die "prepare failed\n";
+$sth->execute( ) or die "unable to execute query $query   error $DBI::errstr";
+while ( @first = $sth->fetchrow_array ) {
+   foreach $field (@first) {
+      print "field: $field\n";
+   }
+}
-===== 예제코드로 테스트 하기 =====
+$dbh->disconnect;
+</code>
+  - [[develop:perl:oracle| DBI를 이용하여 Oracle 연동하기]] 도 참조해 보자.
+===== FAQ =====
+  * 한글이 입력이 되지 않을 경우 freetds.conf 안의 tds version 을 4.2로 수정한다. <code>
+[global]
+    # TDS protocol version
+    tds version = 4.2
+</code>
-===== 관련사이트 =====
+===== Reference =====
   - http://www.freetds.org/
+  - http://www.perlmonks.org/?node_id=392385
   - http://www.peppler.org/freeware/dbd-sybase.html

develop/perl/mssql.1215315542.txt.gz · 마지막으로 수정됨: 2025/10/03 22:30 (바깥 편집)