use HTML::Entities:

use HTML::Entities;
my $str = <<EOH;
&#1054;&#1095;&#1077;&#1085;&#1100; &#1042;&#1072;&#1078;&#1085;&#1072
+;&#1103; &#1041;&#1080;&#1079;&#1085;&#1077;&#1089;-&#1064;&#1082;&#1
+086;&#1083;&#1072;
EOH
print decode_entities($str);
[download]

should output russian unicode.