perl - Perl - Windows コンソールでのエンコーディングの問題を解決するには?

Question

ロシア語の lettaz とコンソールを使用しようとすると、utf8/utf-8 または cp1251 ディレクティブの使用に反応しないため、ロバのように動作します。赤い色でマークされたテキストのエンコーディングはわかりません。誰でもそれを解決する方法を知っていますか? 以下のコードリスト：

#!/usr/bin/perl -w
use strict;
use warnings;
use Tie::IxHash;

tie my %hash, "Tie::IxHash";
   %hash = (
    'шляпа' => 'серая',
    'водка' => 'горькая',
    'вобла' => 'вкусная');

print "В упорядоченной вставке список хеша такой:\n";
foreach my $qwerty (keys %hash){
    print " $qwerty\n";
}
print "Кроме того, предметы обладают некоторыми свойствами:\n";
while((my($predmet, $opredelenie)) = each %hash){
print "$predmet $opredelenie","\n";
}