print map {"$_ \t $hash_count{$_} \n"} @sorted_data;