Как добавить значения в структуру данных

Есть структура на perl:
$VAR1 = {
'pets' => [
{
'cat' => [
{ 'dob' => [ '1 February 2004' ],
'name' => [ 'Madness' ],
'price' => [ '150' ] },
{ 'dob' => [ '23 June 2006' ],
'name' => [ 'Little' ],
'price' => [ '25' ] }
],
'dog' => [
{ 'owner' => [ 'Rosie' ],
'dob' => [ '12 October 2005' ],
'name' => [ 'Maggie' ],
'price' => [ '75' ] } ] }
]
};
Нужно к 'dogg' добавить еще данные
{ 'owner' => [ 'Greck' ],
'dob' => [ '21 February 2007' ],
'name' => [ 'Jasmine' ],
'price' => [ '82' ] }