$hash{$_} = "toto" for qw [a b c d e f g];

##</code><code>##

    @hash{qw [a b c d e f g]} = ('toto') x 7;