mojo 默认use utf8;

	my 	$endtime=strftime("%Y%m%d%H%M%S",localtime());
	
	my $d=encode_utf8('验证');
	if ($a3 =~/$d/){ 
	#$msg->reply("\@$friend $a1-$a3-$a4");
	$a3=decode_utf8("$a3");
	##encode("utf8",decode("gbk","格式为:中均/温金 客户手机号"))
	 #@content=($a1,$a3,$a4);
	 my @content=("$a1","$a3","$a4");
	 my $href= \@content;
	 push (@arr_out ,$href);

posted @ 2016-05-03 09:02  czcb  阅读(108)  评论(0编辑  收藏  举报