Hi,
Anyone have a solution to this problem. Using following code:
#!E:\Perl\bin\perl.exe
print "Content-type: text/html\n\n";
use strict;
use DBI();
print "<HTML><HEAD><TITLE>Waitingroomsite</TITLE></HEAD>";
print "<BODY BGCOLOR=\"#ffffff\"><TABLE BORDER=0 WIDTH=\"100\">";
print "<TR><TD><FONT
FACE=\"Helvetica,Verdana,Arial\"><B></B></FONT></TD>";
print "<TD><FONT
FACE=\"Helvetica,Verdana,Arial\"></FONT></TD></TR>";
print "list of mysql databases:<p>";
my $dbh =
DBI->connect("DBI:mysql:database=waitingroom;host=138.68.26.210:3306",
"administrator", "admin",
{'RaiseError' => 1});
print "<TR><TD VALIGN=top><FONT FACE=\"Helvetica,Verdana,Arial\">";
print "</FONT></TD>";
print "<TD><FONT
FACE=\"Helvetica,Verdana,Arial\"></A></FONT></TD>";
print "</TR>";
print "</TABLE></BODY></HTML>";
getting error:
cgi: runCGI (stderr):DBI
connect('database=waitingroom;host=138.68.26.210:3306','administrator',...)
failed: Can't create TCP/IP socket (10106) at
C:\jakarta-tomcat-4.1.24\webapps\pds\WEB-INF\cgi\example.pl line 39
I'm wondering about a number of things:
don't tcp/ip require porting code; io:socket code
Is it easier like a configuration issue . i.e. configuring my.ini.
Any help is much appreciated.
**********************************************************************
This document is strictly confidential and is intended for use by
the addressee unless otherwise indicated.
Allied Irish Banks
**********************************************************************