|
 |
|
|
홈 > 게시판 > 공지사항 |
 |
|  테크노트에서의 한자변환소스 (Perl 언어기반) | |
| |
 님이 2003년 02월 27일 11:30:29 에 작성한 글입니다. (read:4886, vote:1493) 추천하기 |
|
|
여기에서 말하는 한자변환이란, 한자앞에 <font face=굴림>을 자동적으로 붙여주는 것을 말합니다.
즉, 한자는 기본폰트로 보여지게 하고 다른 글자는 원래대로 웹폰트로 보여지게 하고 싶을때 이 소스를 사용해 주십시요.
테크노트에서의 한자변환소스... - 소스제공 비혼님.
1. 테크노트의 루트디렉토리에 있는 read.cgi 파일을 수정해야 합니다.
2. read.cgi 파일에서 아래의 소스를 찾아냅니다.
chop(@readtext);
shift(@readtext);
위 두줄이 있는 곳을 찾아서 아래의 소스를 추가해 줍니다.
sub on_change_hanja {
$string = $_[0];
$len = length($string);
$check = 0;
for ($i=0; $i<$len; $i++) {
$ascii = ord(substr($string,$i,1));
if ($ascii>=0xB0 && $ascii<=0xC8) {
if ($check) { $check = 0; $new .= "</font>"; }
$new .= substr($string,$i,2);
$i++;
next;
}
if ($ascii>=0xCA && $ascii<=0xFD) {
if (!$check) { $check = 1; $new .= "<font face=굴림>"; }
$new .= substr($string,$i,2);
$i++;
next;
}
if ($check) { $check = 0; $new .= "</font>"; }
$new .= substr($string,$i,1);
}
return $new;
}
@readtext = on_change_hanja(@readtext);
위의 소스만 그 아래로 추가해 주면 됩니다.
혹시 문제가 있거나 성공하신분은 질문 게시판에 글 좀 남겨주세요. ^^
|
| Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0) |
|
|
|
 |
|
|
라이센스 확인
