How to set dynamically keys names in perl %hash

hello
I have loop , in this loop im picking names , this names I want to be keys in %hash
but I don't know how to set in every loop entertain different key in the %hash

Have a look at the keys() function.

http://perldoc.perl.org/functions/keys.html