my %hash = map {$_ => undef} @keys;

##</code><code>##

my $hashRef = {foo => {map {$_ => undef} @keys}};