Sorry just a typo in the email -- it was "DBI:mysql" and same result.

> -----Original Message-----
> From: Paul DuBois [mailto:[EMAIL PROTECTED]]
> Sent: Monday, April 15, 2002 7:10 PM
> To: Rakesh Mahajan; 'Sterin, Ilya'; [EMAIL PROTECTED]
> Subject: RE: Perl and MySQL
> 
> 
> At 18:59 -0700 4/15/02, Rakesh Mahajan wrote:
> >Copied exactly from the perldoc DBD::MySQL I used
> >
> >>>
> >
> >use DBI;
> >
> >
> >     my $dbh = 
> DBI->connect("DBI:myswql:NetAttend:10.0.0.38", "visitor",
> >"swdev",{RaiseError => 1})
> 
> "DBI:myswql"??? Try "DBI:mysql" instead...
> 
> 
> >                             or die "Failed to connect: ($DBI::err)
> >$DBI::errstr\n";
> >>>
> >
> >and that resulted in
> >
> >>>
> >SV = RV(0x1a912f0) at 0x1db68a8
> >   REFCNT = 1
> >   FLAGS = (ROK)
> >   RV = 0x1db6914
> >         (in cleanup) dbih_getcom handle 
> DBI::dr=HASH(0x1db6914) is not a DBI
> >han
> >dle (has no magic) at D:/Perl/lib/DBI.pm line 481.
> >SV = RV(0x1a912f0) at 0x140fd5c
> >   REFCNT = 1
> >   FLAGS = (ROK,READONLY)
> >   RV = 0x1db6914
> >         (in cleanup) dbih_getcom handle 
> DBI::dr=HASH(0x1db6914) is not a DBI
> >han
> >dle (has no magic) at D:/Perl/lib/DBI.pm line 482.
> >DBD::mysql initialisation failed:
> >dbih_setup_attrib(DBI::dr=HASH(0x1db6914)): Fe
> >tchHashKeyName not set and no parent supplied at 
> D:/Perl/lib/DBI.pm line
> >657.
> >         (in cleanup) dbih_getcom handle 
> DBI::dr=HASH(0x1db6914) is not a DBI
> >han
> >dle (has no magic) at D:/Perl/lib/DBI.pm line 481.
> >         (in cleanup) dbih_getcom handle 
> DBI::dr=HASH(0x1db6914) is not a DBI
> >han
> >dle (has no magic) at D:/Perl/lib/DBI.pm line 482.
> >
> >>>
> >
> >What am I missing ?  I'd really like to get beyond this.
> >
> >Rakesh.
> >
> >>  -----Original Message-----
> >>  From: Sterin, Ilya [mailto:[EMAIL PROTECTED]]
> >>  Sent: Monday, April 15, 2002 6:39 PM
> >>  To: 'Rakesh Mahajan'; [EMAIL PROTECTED]
> >>  Subject: RE: Perl and MySQL
> >>
> >>
> >>  Look at your connect string and then carefully read perldoc
> >>  DBD::MySQL.
> >>  (hint)
> >>
> >>  Ilya
> >>
> >>  > -----Original Message-----
> >>  > From: Rakesh Mahajan [mailto:[EMAIL PROTECTED]]
> >>  > Sent: Monday, April 15, 2002 4:09 PM
> >>  > To: '[EMAIL PROTECTED]'
> >>  > Subject: Perl and MySQL
> >>  >
> >>  >
> >>  > I am new to Perl and trying to access a database using JDBC. 
> >>  > I have installed MySQL on a box running Linux which is
> >>  > hosting the target DB.  I am running on W2K using
> >>  > ActiveState's Perl.  I have installed the JDBC driver for
> >>  > MySQL on the W2K machine and can access the target DB using
> >>  > this driver and Java.
> >>  >
> >>  > I installed DBD::JDBC, the JDBC proxy driver for DBI.  Per
> >>  > the documentation I started the JDBC server app using the
> >>  > following batch file -
> >>  >
> >>  > echo "Starting DBD::JDBC Server"
> >>  >
> >>  > >>
> >>  > @echo off
> >>  > rem  This batch file starts DBD::JDBC server
> >>  > set
> >>  > CLASSPATH=%CLASSPATH%;d:\Perl\lib\mm.mysql-2.0.11-bin.jar;d:\P
> >>  > erl\lib\dbd_jd
> >>  > bc.jar
> >>  > set DRIVERS=org.gjt.mm.mysql.Driver
> >>  > start java -Djdbc.drivers=%DRIVERS% -Ddbd.port=9001
> >>  > -Ddbd.trace=abusive com.vizdom.dbd.jdbc.Server
> >>  > >>
> >>  >
> >>  >
> >>  > This app appears to start OK and spits out a message -
> >>  > "Accepting Connections".
> >>  >
> >>  > I then run the following script to try and connect to the
> >>  JDBC driver
> >>  > -
> >>  >
> >>  > >>
> >>  > use DBI;
> >>  >
> >>  > print "Connecting to DBD::JDBC\n";
> >>  >
> >>  >
> >>  >
> >>  > $user = "abcd";
> >>  > $password = "xyz0";
> >>  > $dsn =
> >>  > "dbi:JDBC:hostname=localhost:9001;url=org.gjt.mm.mysql.Driver:
> >>  > DBName:10.0.0.
> >>  > 10:3306";
> >>  > $dbh = DBI->connect($dsn, "abcd", "xyz0",
> >>  >           { PrintError => 0, RaiseError => 1, });
> >>  >
> >>  > exit 0;
> >>  > >>
> >>  > and get the following:
> >>  >
> >>  > >>
> >>  > Connecting to DBD::JDBC
> >>  > SV = RV(0x1a99788) at 0x262bafc
> >>  >   REFCNT = 1
> >>  >   FLAGS = (ROK)
> >>  >   RV = 0x262bb74
> >>  > SV = RV(0x1a99788) at 0x140fd5c
> >>  >   REFCNT = 1
> >>  >   FLAGS = (ROK,READONLY)
> >>  >   RV = 0x262bb74
> >>  > DBD::JDBC initialisation failed:
> >>  > dbih_setup_attrib(DBI::dr=HASH(0x262bb74)): Fet
> >>  > chHashKeyName not set and no parent supplied at
> >>  > D:/Perl/lib/DBI.pm line 657.
> >>  >         (in cleanup) dbih_getcom handle
> >>  > DBI::dr=HASH(0x262bb74) is not a DBI han dle (has no magic)
> >>  > at D:/Perl/lib/DBI.pm line 481.
> >>  >         (in cleanup) dbih_getcom handle
> >>  > DBI::dr=HASH(0x262bb74) is not a DBI han dle (has no magic)
> >>  > at D:/Perl/lib/DBI.pm line 482.
> >>  > >>
> >>  >
> >>  > I have tried accesing the DBD::mySQL directly as follows:
> >  > >
> >>  > >>
> >>  > # This script connects to DBD::mySQL
> >>  >
> >>  > use DBI;
> >>  > use strict;
> >>  >
> >>  > print "Connecting to DBD::MySQL\n";
> >>  >
> >>  > DBI->trace(4, "trace.log");
> >>  > print "Issuing Connect command\n";
> >>  > my $host = '10.0.0.38';
> >>  > my $user = 'visitor';
> >>  > my $password = 'swdev';
> >>  > my $database = 'NetAttend';
> >>  > my $port=3306;
> >>  > my $dsn = "DBI:mysql:$database:$host:$port";
> >>  > my $dbh = DBI->connect($dsn, $user, $password);
> >>  >
> >>  >
> >>  >
> >>  > exit 0;
> >>  >
> >>  > >>
> >>  >
> >>  > and get the following in the log file:
> >>  >
> >>  > >>
> >>  >
> >>  >     DBI 1.201-nothread dispatch trace level set to 4
> >>  >     -> DBI->connect(DBI:mysql:NetAttend:10.0.0.38:3306,
> >>  > visitor, swdev)
> >>  >     -> DBI->install_driver(mysql) for perl=5.006001 pid=668
> >>  > ruid=0 euid=0
> >>  >        install_driver: DBD::mysql loaded (version 2.0400)
> >>  >     New DBI::dr (for DBD::mysql::dr, parent=, id=)
> >>  >    
> >>  > 
> dbih_setup_handle(DBI::dr=HASH(0x1df774c)=>DBI::dr=HASH(0x1aaa13c),
> >>  > DBD::mysql::dr, 0, Null!)
> >>  >     dbih_make_com(Null!, DBD::mysql::dr, 84)
> >>  >     -> DBI::END
> >>  >     <- DBI::END complete
> >>  > >>
> >>  >
> >>  > I have no clue what this is and have not been able to 
> solve this.
> >>  >
> >>  > Any ideas/suggestions ?
> >>  >
> >>  > Thanks for your help.
> >>  >
> >>  > RM.
> >>  >
> >>
> 

Reply via email to