rharsh, thank you so much for your help. when you assigned 1 as a value for a hash, can you assign other values as well?
Now, suppose, see below
#####################################################
@arry = ("peter", "smith", "john", "kelly");
foreach $person (@arry)
{
$group{$person} = 1...