use Text::Iconv;
$converter = Text::Iconv->new("UTF8", "LATIN1");
$converted = $converter->convert( $utf8_string);