用perl连接mysql时出现的问题。。。。

nggs8411

以下是我的source code：

#!usr/bin/perl

use DBI();
use DBD::mysql;
use strict;

my ($name,$databaseHandle,$query,$statementHandle,$password_in_db,@password,$exit);

print "Please input your name : ";
chomp($name = <STDIN>);

$databaseHandle = DBI->connect("DBI:mysql:test", "root","******",{RaiseError=>1});

$query = "SELECT password FROM users ";

$statementHandle = $databaseHandle->prepare($query);
$statementHandle->execute();
.
.
.
.
.
.


请问有什么问题？？？
出现的error:
"DBI connect('test','root',....)failed: Can't connect to MySQL server on 'localhost' (100610 at connect_db.pl line 12"