The coding at an insertion in a DB from PERL spoils. How to decide?

Question

Perl

When UPDATE from the perl script spoils the text encoding, and incomprehensible characters are entered into the database instead of the Russian text. Tell me how to solve this problem? I am attaching a code example. koi8r script encoding, koi8r_general_ci table encoding

$name_bank = 'Имя банка';
        
                $sql="UPDATE arm_money SET number_bank_acc='$number_bank_account', name_bank='$name_bank', related_pay_info='$related_pay_info' WHERE LinkID= ".$m;
                $sth= $dbh->prepare($sql) or error('CANNOT_PREPARE', 'Не могу подготовить запрос '.(DEBUG ? $sql.':<br> '.$DBI::errstr : ''));     
                $sth->execute() or error('CANNOT_EXECUTE', 'Не могу выполнить запрос '.(DEBUG ? $sql.':<br> '.$DBI::errstr : ''));

Answer 1

SET NAMES 'koi8-r'

Answer 2

Make base, table, connection encoding utf8_general_ci, and everything will work.

Answer 3

Thank you all guys in particular krypt3r and ThunderCat .
I did it a little differently, in addition to the database, I also recorded this data in an excel book, pulled it out of excel, did $dbh->do("SET NAMES 'utf8'");
$dbh->do("SET character_set_connection = 'utf8'");
and everything is displayed normally!