With the Encode module.

use warnings;
use strict;
use Encode;

my $string = 'A bunch of cyrillic characters that won\'t show up corre
+ctly here.';

Encode::from_to($string, 'utf-8', 'cp1251'); # or whatever
[download]