If you only need to populate the keys of the hash, then

@hash{@array} = ();

will work. The values will all be undef.

--
<http://www.dave.org.uk>

"The first rule of Perl club is you don't talk about Perl club."