[perl] 한글 깨끗하게 짜르기

회원가입

출석체크

마이페이지

CGIMALL

jquery , CSS , PHP , Javascript , 무료폰트 , ASP

홈 > 커뮤니티 > 골드팁 상세보기

클라우드태그

Javascript

PHP

html

asp

mysql

CSS

mobile

jquery

image

slide

占쌨댐옙

占쏙옙占쏙옙占쏙옙트

메뉴

현재접속자 명

315

3,631

2004-02-03 20:16:21

닉네임

HappyCGI

제목

[perl] 한글 깨끗하게 짜르기

내용

해피CGI 입니다.

한글이 2바이트를 쓰기 때문에 일반 문자열을 자르는 함수를 썼을때

한글이 깨어지는 경우가 종종있죠?

아래 코드를 쓰시면 간단히 해결되겠네요.

[프로그램코드]

if( length($text) > 60 ) {
$text = substr($text,0,60);
$text =~ s/(([\x80-\xff].)*)[\x80-\xff]?$/$1/;
}

자료출처 : http://www.perl.or.kr/tips/cut_han.html

이전게시글 기본 유닉스 쉘 명령어

2004-01-26 13:28:04


	다음게시글 [자바스크립트] 간단하고 빠른 포워딩	2004-02-06 18:55:41