[root@wx03 lib]# cat a1.pl
#引入模块
use URI::Escape;
#urlencode
$encoded = uri_escape("【中均】");
print $encoded."
";
[root@wx03 lib]# perl a1.pl
%E3%80%90%E4%B8%AD%E5%9D%87%E3%80%91
&usign=%E3%80%90%E4%B8%AD%E5%9D%87%E3%80%91
[root@wx03 lib]# cat a1.pl
#引入模块
use URI::Escape;
#urlencode
$encoded = uri_escape("【中均】");
print $encoded."
";
[root@wx03 lib]# perl a1.pl
%E3%80%90%E4%B8%AD%E5%9D%87%E3%80%91
&usign=%E3%80%90%E4%B8%AD%E5%9D%87%E3%80%91