use Digest::JHash 'jhash';
print 'Checksum: 6' . jhash('info:http://www.google.com/');
__DATA__
Checksum: 64222138902