perl 处理json 数组格式

[root@dr-mysql01 ~]# cat a1.pl
use Encode;
use JSON;
use URI::Escape;
use LWP::Simple;
my $host = "http://192.168.32.101:3000/api/getcode?env=zj&phone=18072722237";
my $content = get($host);
print "\$content  is $content\n";  

print "111111111111111111111\n";
print $content->[0]->[1];
print "\n";

print "3333333333333333333333333\n";
my $array = decode_json($content);
print $array->[0]->[1];
print "\n";

[root@dr-mysql01 ~]# perl a1.pl
$content  is [["2016-04-27 13:04:30,325","您的验证码为956047，本验证码5分钟内有效。 ","to phoneNo:18072722237"],["2016-04-27 13:05:58,839","您的验证码为161980，本验证码5分钟内有效。 ","to phoneNo:18072722237"]]
111111111111111111111

3333333333333333333333333
Wide character in print at a1.pl line 20.
您的验证码为956047，本验证码5分钟内有效。