Arrays Perl-从复杂散列中收集数据

最近我从老板那里得到了这个所谓的散列信息，要求我从中收集信息。我尽我所能去完成它。。。不幸的是，我什么也没从中得到。这是我想从中得到的。。。我需要如下所示的UNIT标记下的键“3”、“9”和“10”的值，请帮助我如何在perl中实现它

$VAR1 = {
      'DETAIL' => {
                  'UNIT' => [
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              },
                              {
                                '1' => 'A',
                                '2' => 'B',
                                '3' => C,
                                '4' => D,
                                '5' => 'E',
                                '6' => 'F',
                                '7' => 'Y',
                                '8' => '',
                                '9' => 'G',
                                '10' => 'H',
                                '11' => '0'
                              }
                            ],
                  'z' => 'qq'
                },
      'HEADER' => {
                    'session_id' => '123456789',
                    'trans_id' => '143580181175634',
                    'timestamp' => '143580181175634',
                    'destination' => [
                                       '24658547',
                                       '34547846'
                                     ],
                    'origin' => 'SERVER1',
                    'type' => 'UnitInfo',
                    'buffer' => 'STANDARD',
                    'origin_name' => 'TESTServer1'
                  }
    };

这里有一个简单的方法。（请注意，数据中有未加引号的字符。）

输出：

$VAR1 = {
      '3' => [
               'C',
               'C',
               'C'
             ],
      '10' => [
                'H',
                'H',
                'H'
              ],
      '9' => [
               'G',
               'G',
               'G'
             ]
    };

这里有一个简单的方法。（请注意，数据中有未加引号的字符。）

输出：

$VAR1 = {
      '3' => [
               'C',
               'C',
               'C'
             ],
      '10' => [
                'H',
                'H',
                'H'
              ],
      '9' => [
               'G',
               'G',
               'G'
             ]
    };

$VAR1 = {
      '3' => [
               'C',
               'C',
               'C'
             ],
      '10' => [
                'H',
                'H',
                'H'
              ],
      '9' => [
               'G',
               'G',
               'G'
             ]
    };