Kết nối với SQL Server 2005 từ Perl và thực hiện lệnh CHỌN

Bạn sẽ cần sử dụng DBI và có lẽ tốt nhất bạn nên sử dụng nhà cung cấp DBD ::ODBC từ (CPAN ). Nếu bạn không biết về DBI, thì bạn cần phải đọc về điều đó. Có một cuốn sách ( Lập trình Perl DBI ) cũ nhưng vẫn còn giá trị.

Sau đó, một cái gì đó như sau:

use strict;
use warnings;
use DBI;

# Insert your DSN's name here.
my $dsn = 'DSN NAME HERE'

# Change username and password to something more meaningful
my $dbh = DBI->connect("DBI:ODBC:$dsn", 'username', 'password')

# Prepare your sql statement (perldoc DBI for much more info).
my $sth = $dbh->prepare('select id, name from mytable');

# Execute the statement.
if ($sth->execute)
{
    # This will keep returning until you run out of rows.
    while (my $row = $sth->fetchrow_hashref)
    {
        print "ID = $row->{id}, Name = $row->{name}\n";
    }
}

# Done. Close the connection.
$dbh->disconnect;