json 数据类型

[root@dr-mysql01 lwp]# perl yyget.pl 
$content is {"succ":true,"err_msg":"","is_succ":true,"timeout":false,"overdue":false}
[root@dr-mysql01 lwp]# cat yyget.pl 
use Encode;  
use Encode::CN;  
use URI::Escape;  
use LWP::Simple;  
#$host = "http://ip.taobao.com/service/getIpInfo.php?ip=202.101.172.35";  
$host = "http://licai.yingyinglicai.com/user/smsVerifySend.do?mobile=180xxx2237";  
$content = get($host);  
print "\$content is $content\n";