在Perl中,可以使用JSON
模块来处理JSON数组。以下是一个处理JSON数组的示例:
use JSON;
my $json_text = '[1, 2, 3, 4, 5]';
my $json_array = decode_json($json_text);
# 遍历JSON数组
foreach my $element (@$json_array) {
print "$element\n";
}
# 将JSON数组转换为Perl数组
my @perl_array = @$json_array;
首先,我们使用decode_json
函数将JSON文本解码为Perl数据结构。然后,我们可以像处理普通Perl数组一样处理这个JSON数组。