perl uri_escape(urlencode ) 转换

[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