L'OO lui-même est correct.
Le message d'erreur provient de MySQL, refusant l'accès à l'utilisateur 'delkav', mais l'utilisateur avec lequel vous voulez vous connecter est 'root'.
Quoi qu'il en soit, il semble que votre ligne DBI-> connect() soit erronée. Pour suivre les DBD::mysql docs , vous devez changer votre ligne :
my $connect = DBI->connect("DBI:mysql:$database:$host", $user, $pwd) or die $DBI::errstr;
à
my $connect = DBI->connect("DBI:mysql:database=$database;host=$hostname;", $user, $pwd) or die $DBI::errstr;
