$ perl t.pl
$VAR1 = {
          'LUC325C' => {
                         'LUC204A' => {
                                        'KHYST' => '',
                                        'OFFSETN' => '0',
                                        'TROFFSETN' => '0',
                                        'OFFSETP' => '3',
                                        'LOFFSETN' => undef,
                                        'DIR' => 'MUTUAL',
                                        'LOHYST' => '5',
                                        'LHYST' => '3',
                                        'CAND' => 'BOTH',
                                        'BQOFFSET' => '3',
                                        'LOFFSETP' => '0',
                                        'CELLR' => 'LUC204A',
                                        'KOFFSETN' => '0',
                                        'KOFFSETP' => '3',
                                        'TRHYST' => '',
                                        'HIHYST' => '',
                                        'CS' => 'NO',
                                        'AWOFFSET' => '5',
                                        'BQOFFSETAFR' => '3',
                                        'TROFFSETP' => '2'
                                      },
                         'LUC116A' => {
                                        'KHYST' => '',
                                        'OFFSETN' => '0',
                                        'TROFFSETN' => '0',
                                        'OFFSETP' => '3',
                                        'LOFFSETN' => undef,
                                        'DIR' => 'MUTUAL',
                                        'LOHYST' => '5',
                                        'LHYST' => '3',
                                        'CAND' => 'BOTH',
                                        'BQOFFSET' => '3',
                                        'LOFFSETP' => '0',
                                        'CELLR' => 'LUC116A',
                                        'KOFFSETN' => '0',
                                        'KOFFSETP' => '3',
                                        'TRHYST' => '',
                                        'HIHYST' => '',
                                        'CS' => 'NO',
                                        'AWOFFSET' => '5',
                                        'BQOFFSETAFR' => '3',
                                        'TROFFSETP' => '2'
                                      },
                         'LUC325B' => {
                                        'KHYST' => '',
                                        'OFFSETN' => '0',
                                        'TROFFSETN' => '0',
                                        'OFFSETP' => '3',
                                        'LOFFSETN' => undef,
                                        'DIR' => 'MUTUAL',
                                        'LOHYST' => '5',
                                        'LHYST' => '3',
                                        'CAND' => 'BOTH',
                                        'BQOFFSET' => '3',
                                        'LOFFSETP' => '0',
                                        'CELLR' => 'LUC325B',
                                        'KOFFSETN' => '0',
                                        'KOFFSETP' => '3',
                                        'TRHYST' => '',
                                        'HIHYST' => '',
                                        'CS' => 'NO',
                                        'AWOFFSET' => '5',
                                        'BQOFFSETAFR' => '3',
                                        'TROFFSETP' => '2'
                                      }
                       },
          'LUC082B' => {
                         'LUC204A' => {
                                        'CELL' => 'LUC082B'
                                      }
                       }
        };

$