Das OO selbst ist korrekt.
Die Fehlermeldung kommt von MySQL und verweigert den Zugriff für den Benutzer 'delkav', aber der Benutzer, mit dem Sie sich verbinden möchten, ist 'root'.
Wie auch immer, scheint Ihre DBI-> connect () -Zeile falsch zu sein. Folgen Sie den DBD::mysql-Dokumentation , müssen Sie Ihre Zeile ändern:
my $connect = DBI->connect("DBI:mysql:$database:$host", $user, $pwd) or die $DBI::errstr;
zu
my $connect = DBI->connect("DBI:mysql:database=$database;host=$hostname;", $user, $pwd) or die $DBI::errstr;
