Welcome, Guest
Username Password: Remember me

connect to my MySQL database using Perl?
(1 viewing) (1) Guest
Perl Script
  • Page:
  • 1

TOPIC: connect to my MySQL database using Perl?

connect to my MySQL database using Perl? 1 year, 4 months ago #494

  • rajeshkumar
  • OFFLINE
  • Moderator
  • I love software configuration management
  • Posts: 370
  • Points: 44560
  • Karma: 4
  • Honor Medal 2009
#!/usr/bin/perl
use DBI;

$database = "DBNAME";
$hostname = "DBSERVER";
$port = "3306";
$username = "DBUSERNAME";
$password = 'DBPASSWORD';

$dsn = "DBI:mysql:database=$database;host=$hostname;port=$port";

$dbh = DBI->connect($dsn, $username, $password) or die("Could not connect!");

$sql = "SELECT * FROM mytable";

$sth = $dbh->prepare($sql);
$sth->execute;


while(($column1, $column2) = $sth->fetchrow_array)
{
print "C1 = $column1, C2 = $column2n";
}


$dbh->disconnect;


where DBNAME, DBUSERNAME, and DBPASSWORD are your database name, database username and database password, and where DBSERVER is your database server.
Regards,
Rajesh Kumar
Build and Release Engineer
My Blog: community.scmgalaxy.com/pg/profile/rajeshkumar
  • Page:
  • 1
Time to create page: 0.46 seconds

     
    
Home Forum