perl Crypt-SmbHash