Select Code to Download

Subject: XYZ =?UTF-8?B?7Y647JWI7ZWcIOqwgOq1rOyXkOyEnCBCTkMg6rOE7KCVIO2
+ZnOyEsQ==?=
 =?UTF-8?B?7ZmU?=

talexb@foo:~/bin$ encode "XYZ 편안한 가&#44396
+;에서 BNC 계정 활성화"

 =?UTF-8?B?WFlaIMOtwo7CuMOswpXCiMOtwpXCnCDDqsKwwoDDqsK1wqzDrMKXwpDDrMK
+EwpwgQk5DIMOqwrPChMOswqDClSDDrcKZwpzDrMKEwrHDrcKZwpQ=?=

talexb@foo:~/bin$ decode =?UTF-8?B?7Y647JWI7ZWcIOqwgOq1rOyXkOyEnCBCTkM
+g6rOE7KCVIO2ZnOyEsQ==?= =?UTF-8?B?7ZmU?=
편안한 가구에서 BNC 계
+정 활성 화

talexb@foo:~/bin$ decode =?UTF-8?B?WFlaIMOtwo7CuMOswpXCiMOtwpXCnCDDqsK
+wwoDDqsK1wqzDrMKXwpDDrMKEwpwgQk5DIMOqwrPChMOswqDClSDDrcKZwpzDrMKEwrHD
+rcKZwpQ=?=
XYZ í¸ìí ê°êµ¬ìì BNC ê³ì  íì±í

#!/usr/bin/perl -wC

...
    }
    print join(' ',@out) . "\n";
}

#!/usr/bin/perl -w

...
    binmode STDOUT, ':utf8';
    print join(' ',@out) . "\n";
}