my %hash = ( ( map { $_=>'toto' } qw( a b c f t u ) ), ( map { $_=>'titi' } qw( b g k p ) ), ); #### $hash{$_} = 'toto' for qw( a b c f t u ); $hash{$_} = 'titi' for qw( b g k p );