我希望在服务器端遍历哈希表,并使用JSON以排序的方式将其发送到客户端。
我的问题是:当我在我的foreach循环中拥有关键字和复杂值(请参见下方哈希表的样式)时,如何将其插入到JSON字符串中?
以下是我的操作方式:
我的问题是:当我在我的foreach循环中拥有关键字和复杂值(请参见下方哈希表的样式)时,如何将其插入到JSON字符串中?
以下是我的操作方式:
use JSON;
my $json = JSON->new;
$json = $json->utf8;
...
# use numeric sort
foreach my $key (sort {$a <=> $b} (keys %act)) {
# somehow insert $key and contents of $act{$key} into JSON here
}
# my $json_string;
# my $data = $json->encode(%h);
# $json_string = to_json($data);
# # return JSON string
# print $cgi->header(-type => "application/json", -charset => "utf-8");
# print $json_string;
print Dumper \%act
的输出结果如下:
$VAR1 = {
'127' => {
'owners' => [
'm'
],
'users' => [
'hh',
'do'
],
'date_end' => '24/05-2011',
'title' => 'dfg',
'date_begin' => '24/05-2011',
'members_groups' => [],
'type' => 'individuel'
},
'276' => {
...