在perl中访问Json对象并在另一个JSON中重用它

时间:2017-06-20 05:52:07

标签: json perl mason

我在我的梅森处理程序中收到了以下格式的参数:

$data = {
    'cacheParams' => 0,
    'requests' => {
        'locationId' => 1,
        'uniqueId' => [
            'ABC',
            'DEF',
            'XYZ'
        ]
    }
};

我可以使用$data['requests']来访问请求。如何访问存储在请求中的值,即locationId和uniqueId?我需要使用这些值以下列方式形成另一个JSON:

my $input = {
    stateID => 44,
    locationId => requests.locationId,
    uniqueId => requests.uniqueId
    .
    .
    .

}

1 个答案:

答案 0 :(得分:2)

$data['requests']->{'locationId'} $data['requests']->{'uniqueId'} or $requests = $data['requests'] $locationId = $requests->{'locationId'} $uniqueId = $requests->{'uniqueId'} 对象应该是你的方式。因此,您可以访问以下键:

l.contentsGravity = kCAGravityCenter