Преобразование строки UTF8 в ASCII в Perl

Я Я перепробовал все, что порекомендовали Google и StackOverflow (что я смог найти), включая использование Encode. Мой код работает, но он просто использует UTF8, и я получаю предупреждения широких символов. Я знаю, как обойти эти предупреждения, но я не использую UTF8 для чего-либо еще, поэтому я хотел бы просто преобразовать его и не нужно адаптировать остальную часть моего кода для его решения. Вот мой код:

my $xml = XMLin($content);
# Populate the @titles array with each item title.
my @titles;
for my $item (@{$xml->{channel}->{item}}) {
    my $title = Encode::decode_utf8($item->{title});
    #my $title = $item->{title};
    #utf8::downgrade($title, 1);
    Encode::from_to($title, 'utf8', 'iso-8859-1');
    push @titles, $title;
}
return @titles;

Закомментировано, вы можете увидеть некоторые другие вещи, которые я пробовал. Я хорошо знаю, что я не знаю, что я здесь делаю. Я просто хочу закончить простой старой строкой ASCII. Любые идеи очень приветствуются. Спасибо.