eval {
                $unicode = Encode::decode($from,$str); #here $from is 'MIME-Header'
            };
            if ($@)
            {
                &ConvertEncodingError("($from -> utf8)\n$@");
                return $str;
            }