I would probably approach this with Graph::Base, more specifically, Graph::Undirected. Create a vertex for each customer and product. Add Edges between customer and products that they use. Then you could determine the favorite products by looking at the degree for each product node.

On the other hand, you could probably get what you want in the database world by using a 'group by' clause.

Just some thoughts.