J'utilise Blowfish pour chiffrer et déchiffrer avec le code ci-dessous. Je dois retourner une erreur s'il y a un problème avec Decryption si la ligne cryptée n'a pas le bon Salt. Tel qu'il est, le script meurt juste. MerciBlowfish Encrypt et Decrypt besoin de retourner une erreur
sub decrypt { $cipher = new Crypt::CBC($key, 'Blowfish');
defined $_[0] ? $cipher->decrypt_hex($_[0]) : ''
#I NEED SOMETHING LIKE
#if ($cipher){ $return = $cypher; }
#else{ $return = "BadNumber"; }
return $return;
}
sub encrypt { $cipher = new Crypt::CBC($key, 'Blowfish');
defined $_[0] ? $cipher->encrypt_hex($_[0]) : '' }