Help for this page

Select Code to Download

Select or download this

#!perl.exe

...
$dbh = DBI->connect($dsn,$dbuser,'') or die "couldn't connect to $dbho
+st: " . DBI->errstr . "\n";

print "Done with DB connection\n";

Select or download this

C:\Data\Scripts\Exchange>mysql_connect.pl
Connecting to DB ...
dsn: DBI:mysql:database=ssis;host=1.2.3.4

C:\Data\Scripts\Exchange>