Perl的Json数组中放入哈希数组

标题Perl的Json数组中放入哈希数组

{
   
  "b": "0",
  "c": 1,
  "d": [
      {
   
        "e": "123345",
        "f": "456567"
      },
      {
   
        "e": "123345",
        "f": "456567"
      }
  ]
}

类似于这种的，有两种方法：

#!/usr/local/bin/perl
use strict;
use JSON;

my %out= (
	"b"=>"0",
	"c"=>1,
	"d"=>[