Perl script to ckrack hashes in online database