demonstration of hashing in perl and python