mysql - MySQL サーバー接続はコマンド ラインから機能しますが、DBI を使用する perl スクリプトからは機能しません

Question

コマンドラインからリモートMySQLサーバーに接続できます

mysql -h "mysqlhost" -u user -ppasswd

しかし、perl スクリプトを使用して同じサーバーに接続しようとすると、次のエラーが発生します。

DBI connect(.....)failed: Can't connect to MySQL server on 'mysqlhost' (111)

私のコードは次のようになります。

use DBI;
use DBD:mysql;
my $DBH = DBI->connect("DBI:mysql:database=DB1;host=mhsqlhost", "user", "passwd") ||   die "Connection Failed: $DBI::errstr";

どんな入力でも大歓迎です！

どうもありがとう。