spamassassin 인코딩문자 생성법

---------------------------------------------------------
펄스크립트를 하나 만들어서 사용하고 있습니다.

--8x--------------------------------------
#!/usr/bin/perl -w -T
use strict;
use MIME::Base64;
use MIME::QuotedPrint;

my ($input,$base64, $qprint);

if ($#ARGV == 0) { $input = $ARGV[0]; }
else { $input = "광고문구"; }

$base64 = encode_base64($input);
$base64 =~ s/\n//;
$base64 =~ s/={1,2}$//;
chop $base64;
$base64 =~ s/\//\\\//g;
$qprint = encode_qp($input);

print "\n\n";
print "body MY_ADV_20 /($input|$qprint|$base64)/\n";
print "describe MY_ADV_20 성인광고문구\n";
print "score MY_ADV_20 2.0\n\n";
--8x----------------------------------------------------

그럼 수고하세용.



Tester wrote..
> body MY_ADV_20 /(야설|=BE=DF=BC=B3|vt+8s)/
> describe MY_ADV_20 성인광고문구
> score MY_ADV_20 0.4
>
> ---------------------------------------------
> spamassassin의 설정 파일 일부입니다.
>
> ->> (야설|=BE=DF=BC=B3|vt+8s)/
> 여기서 '야설' 뒤쪽의 인코딩 문자열은 어떻게 만들어 내는건가요?
> 더 추가 하고 싶은데 인코딩 방법을 몰라서.