Perl中得到汉字和英文长度
转载本站文章请注明，转载自：扶凯[http://www.php-oa.com]
本文链接: http://www.php-oa.com/2008/12/13/perl-_str.html
Perl中得到汉字和英文长度
sub length_china(){
if(@lc=$_=~/[\x80-\xff]{3}|\w/gi){
return scalar @lc;
}
}
因为在Perl中汉字有三个字节,做for循环时不方便，所以修改了一下,用上面的方法可以给汉字当成一个字符来处理.
暂无留言
我要留言