레드햇 7.2의 perl이 5.6.0에서 5.6.1로 업데이트 되었는데
문제는 이후에 한글이 몽땅 깨진다는거죠.
브라우저에서 소스보기하면 charset=euc-kr 이 있음에도 불구하고요.
그래서 쉘상에서 실행시켜보니 다음처럼 html코드가 시작되기전에
iso-8859-1이 붙어버리네요.
Content-Type: text/html; charset=ISO-8859-1
<html>
<head>
<title>
우선 땜빵으로 /usr/lib/perl5/5.6.1/CGI.pm 에서
372 라인을 주석처리 했습니다.
# set charset to the safe ISO-8859-1
$self->charset('ISO-8859-1'); <-- 이라인을 주석처리
(여기서부터 다시 수정)
그래서 CGI.pm 홈페이지를 봤는데 윗부분 그냥 두고 소스 고쳐줘도 되네요.
다음같은 방식으로요.
#!/usr/bin/perl
use CGI qw(:standard);
print header(-type=>'text/html', -charset=>'euc-kr');
print start_html('A Simple Example'),
h1('간단한 예제'),
참고 URL
http://stein.cshl.org/WWW/software/CGI/