my $key = shift @array;
$test{$key} = [ @array[0,1,2] ];