use Data::Dumper;
print Dumper( [ [ { 1, 2 }, [ [ { 6, 7 } ] ] ] ] );
__END__
$VAR1 = [
          [
            {
              '1' => 2
            },
            [
              [
                {
                  '6' => 7
                }
              ]
            ]
          ]
        ];