Samotný OO je správný.
Chybová zpráva pochází z MySQL a odepírá přístup uživateli 'delkav', ale já uživatel, se kterým se chcete spojit, je 'root'.
Každopádně se zdá, že váš řádek DBI->connect() je špatný. Chcete-li sledovat dokumenty DBD::mysql , musíte změnit svůj řádek:
my $connect = DBI->connect("DBI:mysql:$database:$host", $user, $pwd) or die $DBI::errstr;
do
my $connect = DBI->connect("DBI:mysql:database=$database;host=$hostname;", $user, $pwd) or die $DBI::errstr;