On Tue, 2018-07-10 at 17:50 +0200, Geert Uytterhoeven wrote:> So I can use MIME::QuotedPrint?How about use Encode;[] if (decode("MIME-Header", $line) =~ /^from:\s*(.*)/i) {etc...