आपको डीबीआई का उपयोग करने की आवश्यकता होगी और आप संभवतः डीबीडी ::ओडीबीसी प्रदाता का उपयोग कर रहे हैं (सीपीएएन ) यदि आप डीबीआई के बारे में नहीं जानते हैं, तो आपको इसके बारे में पढ़ना होगा। एक किताब है (पर्ल डीबीआई प्रोग्रामिंग ) जो पुराना है लेकिन फिर भी मान्य है।
फिर निम्न जैसा कुछ:
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;