in reply to How to create nesting hashes given the innermost value and an array of keys?
%hash = map{($_, $value)} @array; [download]
Originally posted as a Categorized Answer.