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






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

1.Listing Currently Installed Drivers
2.Listing Valid DSNs
3.Talking with the Database
4.The connect() Method
5.Connect to Oracle
6.Connect to mysql
7.Binding Columns
8.Available DBI Drivers and Data Sources