小编Van*_*ron的帖子

如何将哈希的perl数组编码为未命名的JSON数组?

我有一个哈希数组,我想将其转换为一个未命名的JSON数组。

如果我有一个哈希数组,然后尝试将其编码为JSON:

my @labs = ();  
push (@labs, {id=>'1', title=>'Lab1'});  
push (@labs, {id=>'2', title=>'Lab2'});  
my $json_text = to_json {\@labs}, {ascii=>1, pretty => 1};  
Run Code Online (Sandbox Code Playgroud)

然后生成的JSON如下所示:

{
   "ARRAY(0x358a18)" : null
}
Run Code Online (Sandbox Code Playgroud)

实际上,我希望它看起来像:

[  
   {"title" : "Lab1", "id" : "1"},  
   {"title" : "Lab2", "id" : "2"}  
]  
Run Code Online (Sandbox Code Playgroud)

arrays perl hash json

2
推荐指数
1
解决办法
1479
查看次数

标签 统计

arrays ×1

hash ×1

json ×1

perl ×1