Sqlserver
 sql >> Base de données >  >> RDS >> Sqlserver

Connectez-vous à SQL Server 2005 à partir de Perl et faites un SELECT

Vous devrez utiliser DBI et il est probablement préférable d'utiliser le fournisseur DBD ::ODBC de (CPAN ). Si vous ne connaissez pas DBI, vous devez vous renseigner à ce sujet. Il y a un livre (Programming the Perl DBI ) qui est ancien mais toujours valide.

Puis quelque chose comme ceci :

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;