메일제목을 base64 로 디코딩 할려구 하는데요
글쓴이: 텅날개 / 작성시간: 월, 2006/01/09 - 6:01오후
안녕하세요?
다름이 아니라
지금 perl 을 이용해서 메일 제목을 base64로 디코딩 할려고
하는데요
대략
=?EUC-KR?B?wNS758H2v/i8rSDA1LTPtNku?=
메일제목이 이런식으로 나오는데요.
여기서 =?EUC-KR?B? 이부분을 삭제하고
base64로 디코딩 해야 하거든요.
그래서 말씀드리는데
앞에 있는 문자코드인 =?EUC-KR?B? 나
=?UTF-8?B? 같은 코드들을
정규식으로 삭제할 수 있는 방법이 없을까요?
아니면 간단한 스트링 처리나요
대략 패턴이 =? 로 시작해서 B? 로 끝나는 문자만
지우면 될꺼 같은데요.
대가리가 돌인지 잘 모르겠네요 ㅠ.ㅠ
Forums:
대충 이렇게 하면 될것 같네요
my $a = "=?EUC-KR?B?wNS758H2v/i8rSDA1LTPtNku?=";
if ($a =~ /^=\?.+?\?[B|Q]\?(.+)?\?=/i) {
print $1;
}
정규화 표현식 많이 사용하니깐 익히면 많음 도움이 되죠
kldp나 google에서 찾아보세요
* 잠시.... character set 을 무작정 날리는것은 문제가 있
* 잠시.... character set 을 무작정 날리는것은 문제가 있어 보입니다만.
my $a = "=?EUC-KR?B?wNS758H2v/i8rSDA1LTP
my $a = "=?EUC-KR?B?wNS758H2v/i8rSDA1LTPtNku?=";
if ($a =~ /^=\?(.+?)\?[B|Q]\?(.+)?\?=/i) {
print $1 . "\t" . $2 . "\n";
}
Perl 만세~~~
메일과 관련된 여러가지 모듈 중에서 제목줄을 해당 인코딩 방식으로 디코딩
메일과 관련된 여러가지 모듈 중에서 제목줄을 해당 인코딩 방식으로 디코딩 해주는 함수가 있을것으로 생각됩니다.
CPAN에는 없는것 빼고 다 있습니다. :twisted:
B또는 Q인코딩의 내용을 이진 바이트열로 풀어넣은 것은 앞에서 지시한 인
B또는 Q인코딩의 내용을 이진 바이트열로 풀어넣은 것은 앞에서 지시한 인코딩으로 인코딩되어 있습니다. euc-kr이라든가 utf-8이라든가... 그런것까지 고려하셔야 합니다. 적절히 변환 루틴을 추가하시면 되겠지요.
아니면 괜찮은 e-mail 처리 라이브러리를 사용하시면(사용하는 언어에 따라 다르겠지만) 그정도는 처리해 줍니다. 그것말고도 이상한 예외처리를 해야 할 경우가 있거든요.
--
익스펙토 페트로눔
Re: 메일제목을 base64 로 디코딩 할려구 하는데요
RFC 2047의 quoted printable이라고 불리는 형식입니다. CPAN에는 Encode::MIME::Header에 있습니다.
- 토끼군
[url=http://qmail.kldp.org/phpbb/viewtop
qmail.kldp.org 참조
역시!
kldp 분들은 모르는게 없스시군요
척척박사
감사감사
댓글 달기