メールのヘッダのデコードに Encode::decode('MIME-Header', $value) を使っていたのだが、うまくいかないケースがでてきた。 use strict; use warnings; use feature 'say'; use Encode qw/encode_utf8 decode/; # 実際のデータ my $subject = "=?utf-8?B?44Ku44Ks44K344ON44OeIHdpdGggVS1ORVhUIOOBiueUs+OB?= =?utf-8?B?l+i+vOOBv+WujOS6huOBruOBiuefpeOCieOBmw==?="; my $decoded = decode('MIME-Header', $subject); say encode_utf8 $decoded;