my @liste = 1..5;
my %hash = ( 
  key1 => [ 1,2,3,4,5],
  key2 => \@liste,
);

push (@{ $hash{key1} }, 6,7,8);
$hash{key1}->[3] = 30;