Perl语言substr应用

Perl语言substr应用 use Encode;   $str=decode('gbk',"测试文本");   print encode('gbk',substr($str,0,1));  ============================================= 指令：substr 语法：substr($string,offset,length)    offset表明起始字

>>阅读原文<<