Help for this page
my %hash; @hash{qw[ a b c f t u] } = ('toto') x 6; @hash{qw[ b g k p ]} = ('titi') x 4;
my %hash; my @array = qw[ a b c f t u]; @hash{@array } = ('toto') x @array;