$subject = =?UTF-8?Q?=E2=9E=9C?='; $decoded_subject = Encode::decode_utf8(MIME::Words::decode_mimewords($subject)); $enti = HTML::Entities::encode_entities_numeric($decoded_subject);