my %hash;
@hash{@array} = undef;