OO ही सही है।
त्रुटि संदेश MySQL से आता है, उपयोगकर्ता 'delkav' के लिए पहुंच से इनकार करता है, लेकिन मैं जिस उपयोगकर्ता से आप जुड़ना चाहते हैं वह 'रूट' है।
वैसे भी, ऐसा लगता है कि आपकी डीबीआई-> कनेक्ट() लाइन गलत है। DBD::mysql डॉक्स का अनुसरण करने के लिए , आपको अपनी लाइन बदलनी होगी:
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;