Question

perl如何有中文与字母的字符串?

比如字符串
"字a符b串"
变成五个字符串
"字"
"a"
"符"
"b"
"串"
如何做到?
最好能写成子函数的形式

Answer 1

这个要看字符的本来编码是什么，只要记住perl内部是用utf8的就可以了，split函数可以完成你想要的功能的
utf8输入utf8输出
@m = split("", $str); print "$_\n" for @m;
假设输入gb2312 输出gb2312，就需要先转为utf8输出的时候再转回去
use Encode;
$s = <$FILE>;
$str = decode("gb2312", $s);
@m = split('', $str);
print encode("gb2312", $_), "\n" for (@m)