@array=("abc","def","abc","klm","abc","rbc","Kjm","rbc","abc");

##</code><code>##

for $i (@array)
{
$hash{$i}=1;
}