How do I push a value onto a Perl hash of arrays?

Question

%TEST ; 

... 
for  {
   sub atest
   }
 sub atest {
 ...
    push $TEST { TEST1 }[0] = "some value " 
}

How do I push values into a hash of arrays without knowing anything about index?

How do I achieve this?

Answer 1

This will add value to the end of array stored in hash by "TEST1" key.

push( @{ $TEST { TEST1 } }, "some value "); 

I've used @{...} to dereference array reference. Perl creates inner array reference automatically then needed.