On Sat, 2 Dec 2000, Terry Collins wrote:
I think it says you don't have msql -- different to MySQL (no y)
Regards, Mehmet
> Gidday Sluggers
>
> This perl script tells me that I don't have a MySQL server on my box
> (localhost), when I do (The Kmysql stuff confirms it is running - I can
>
>
>
> #!/usr/bin/perl -w
>
> use strict;
>
> use CGI qw(:standard);
> use CGI::Carp;
>
> use DBI;
> CGI::use_named_parameters(1);
>
> my ($server, $sock, $host);
>
> my $output = new CGI;
> $server = param('server') or $server = '';
>
> my $driver = DBI->install_driver('mysql');
>
> my @databases = $driver->func($server, '_ListDBs');
>
> if (not @databases) {
> print header, start_html('title'=>"Information on $host",
> 'BGCOLOR'=>'white');
> print <<END_OF_HTML;
> <H1>$server</h1>
> $server does not appear to have a running >>>>>> mSQL server.<<<<<<<<
--
SLUG - Sydney Linux User Group Mailing List - http://slug.org.au/
More Info: http://slug.org.au/lists/listinfo/slug
