Ich verwende Blowfish zum Verschlüsseln und Entschlüsseln mit dem unten stehenden Code. Ich muss einen Fehler zurückgeben, wenn es ein Problem mit Entschlüsselung gibt, wenn sagen, dass die verschlüsselte Zeile nicht das richtige Salt hat. So wie es ist, stirbt das Skript einfach. DankBlowfish Encrypt und Decrypt müssen einen Fehler zurückgeben
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]) : '' }