Use DBI to connect to a database : DBI « Database « Perl

1. Perl
2. Database
3. DBI

Use DBI to connect to a database

   

#!c:/perl/bin

use DBI;

$dbhandle = DBI->connect("dbi:ODBC:address");

$sqlstatement="SELECT firstname, lastname FROM employee";

print "Content-type: text/html \n\n";

$statementhandle = $dbhandle->prepare($sqlstatement);

$statementhandle->execute || die "<br><br>Could not execute SQL statement ... <br>";

print "<br>Executed ...<br><br>";

while (@row=$statementhandle->fetchrow_array)
{
   print "@row <br>";
}

$dbhandle->disconnect();
$statementhandle->finish();

   
    
    
  

Related examples in the same category