Perl DBI->；连接不使用mysql驱动程序

我有以下代码

#!/usr/bin/perl -w
use  DBI;
use strict;
my $user = "test3";
my $password = "test3";
my $dsn = "dbi:mysql:hospital;localhost;3306";
my $dbh = DBI->connect($dsn, $user, $password);

我发现了错误

Can't locate object method "driver" via package "DBD::mysql" at /System/Library/Perl/Extras/5.18/darwin-thread-multi-2level/DBI.pm line 821.

Perhaps the capitalisation of DBD 'mysql' isn't right. at /Users/hrai36/Documents/test2.pl line 9.

---

我对perl非常陌生。我使用cpan安装了DBD:：mysql。我不知道我做错了什么。

是否有一个脚本使用了DBD:：mysql工作？将您的DSN更改为“DBI:mysql:database=hospital；host=localhost；port=3306”，然后看看这是否有效工作？将您的DSN更改为“DBI:mysql:database=hospital；host=localhost；port=3306”，然后查看是否有效。