Select Code to Download

   if ( length($string) > $string =~ tr/\x00-\x7f// ) {
      $string = decode( 'utf8', $string );
   }

   if ( $string =~ /[\x80-\xff]/ ) {
      $string = decode( 'utf8', $string );
   }