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);