in reply to hash of lists - hash of hashes

for merlyn:
%HoL is a hash of lists.
i'd like to change it into a hash of hashes.
each contained, secondary hash would consist of keys from the members of the original list, with corresponding values of just '1'.

not sure if i can be more clear.. probably can; i'm just not good at it.

WAIT! pictures!!

i what to change this:
%HoL = ( fruits     =>  "orange", "banana", "kiwi" ,
         vegetables =>  "carrot", "potato" ,
         cheeses    =>  "cheddar", "american" 
       );
to this:
%HoH = ( fruits     => { orange => 1, banana => 1, kiwi => 1 },
         vegetables => { carrot => 1, potato => 1 },
         cheeses    => { cheddar => 1, american => 1}
        );