Counting the collisions with perl hash tables per function - View it on GitHub