use Text::Iconv;
my $conv = Text::Iconv->new("utf8", "utf8");
$str = $conv->convert($str);