use Encode;
my $string = 'é ç î ù';
Encode::from_to($string, 'iso-8859-1', 'cp437');
print $string;