6 lines
187 B
Plaintext
6 lines
187 B
Plaintext
|
|
perl -E 'use open qw(:std :utf8);
|
|
use Encode;
|
|
say Encode::decode("MIME-Header", "Subject: Re: =?gbk?Q?=C3=C9=B9=C5=CF=EE=C4=BF=D0=CD=D6=C6=D7=F7=B7=BD=B0=B8?=");'
|
|
|