perl中substr截取中文字符的问题

在编写perl程序的时候，咱们有时须要截取一个字符串中的部份内容。这个时候一般会使用substr函数实现这个功能。python $str="testtest"; print substr($str,0,5); 函数 运行上面的程序，输出结果"testt"，这个是咱们想要的结果。再看看下面的程序：测试 $str="测试文本"; print substr($str,0,1);code 这时候输出了一个

>>阅读原文<<