Как указать массив perl assc на простой массив и выдвинуть новые значения?

Question

Это концепция:

%aa = (
  'allphotos' => {}
);

$newkey = 'photogroupone';
$newphotoone = 'dogs at play';
$newphototwo = 'cats at play';

push $aa{'allphotos'}{$newkey}, $newphotoone;
push $aa{'allphotos'}{$newkey}, $newphototwo;

Perl 5.24

Они хотят, чтобы дополнительный текст был опубликован.Что сказать.

Answer 1

Закрыть.Первый аргумент должен быть массивом.

push @{ $aa{'allphotos'}{$newkey} }, $newphotoone;
push @{ $aa{'allphotos'}{$newkey} }, $newphototwo;

или просто

push @{ $aa{'allphotos'}{$newkey} }, $newphotoone, $newphototwo;