my $modul = 1;
eval "use Text::Iconv; 1;" or $modul = 0;
my $converter = Text::Iconv -> new ("CP$codepage",'ISO-8859-1');
if ($modul && defined $converter) {
  $result =  $converter -> convert ($result);
}