El día Sonntag, Juli 19, 2020 a las 08:18:01 +0200, Ulrich Lauther escribió:

> Hi,
> 
> I use
>         grep "Subject: " /var/mail/$USER 
> 
> to extract subject-lines from my mail box and get for instance
> 
>         Subject: =?utf-8?Q?Achtung=20=2D=20don=27t=20say=20that?=
> 
> but in mutt, I see
>         
>         Achtung - don't say that
> 
> How can I get the subject lines in clear text?

$ cat subject.pl
#!/usr/local/bin/perl
#

use Encode;

my $subject = "Subject: =?utf-8?Q?Achtung=20=2D=20don=27t=20say=20that?=";

my $escapedHeaderLine = Encode::decode('MIME-Q', $subject);
print $escapedHeaderLine, "\n";


$ ./subject.pl
Subject: Achtung - don't say that

        matthias
-- 
Matthias Apitz, ✉ g...@unixarea.de, http://www.unixarea.de/ +49-176-38902045
Public GnuPG key: http://www.unixarea.de/key.pub
May, 9: Спаси́бо освободители! Thank you very much, Russian liberators!

Reply via email to