求个函数，谢谢

Question

函数不会自动识别你的文件里是否只有要操作的字符,请确保你的文件内只有
一二三四五六七八九一二三四五六七八九
一二三四五六七八九一二三四五六七八九
一二三四五六七八九一二三四五六七八九这样的数据.<?
function change($input_file_name,$output_file_name,$str_num){
$this_line_str_num = 0;
$file_array=file($input_file_name);
for($i=0;$i<count($file_array);$i++){
$file_arraya=trim($file_array[$i]);
for($k=0;$k<strlen($file_arraya);$k+=2){
$new_file_array .= substr($file_arraya,$k,2);
$this_line_str_num++;
if($this_line_str_num == $str_num){
$new_file_array .= "\n";
$this_line_str_num = 0;
}
}
}
$hd=fopen($output_file_name,"w");
fwrite($hd,$new_file_array);
}
change("test.txt","aaa.txt",10);
?>用法:
<?
change("数据文件","输出文件",每行的字数);
?>