Crypt::Cipher::Blowfish - Symetric cipher Blowfish, key size: 64-448 bits (Crypt::CBC compliant)
### example 1 use Crypt::Mode::CBC; my $key = '...'; # length has to be valid key size for this cipher my $iv = '...'; # 16 bytes my $cbc = Crypt::Mode::CBC->new('Blowfish'); my $ciphertext = $cbc->encrypt("secret data", $key, $iv); ### example 2 use Crypt::CBC; use Crypt::Cipher::Blowfish; my $key = '...'; # length has to be valid key size for this cipher my $iv = '...'; # 16 bytes my $cbc = Crypt::CBC->new( -cipher=>'Cipher::Blowfish', -key=>$key, -iv=>$iv ); my $ciphertext = $cbc->encrypt("secret data");
This module implements the Blowfish cipher. Provided interface is compliant with Crypt::CBC module.
BEWARE: This module implements just elementary "one-block-(en|de)cryption" operation - if you want to encrypt/decrypt generic data you have to use some of the cipher block modes - check for example Crypt::Mode::CBC, Crypt::Mode::CTR or Crypt::CBC (which will be slower).
$c = Crypt::Cipher::Blowfish->new($key); #or $c = Crypt::Cipher::Blowfish->new($key, $rounds);
$ciphertext = $c->encrypt($plaintext);
$plaintext = $c->decrypt($ciphertext);
$c->keysize; #or Crypt::Cipher::Blowfish->keysize; #or Crypt::Cipher::Blowfish::keysize;
$c->blocksize; #or Crypt::Cipher::Blowfish->blocksize; #or Crypt::Cipher::Blowfish::blocksize;
$c->max_keysize; #or Crypt::Cipher::Blowfish->max_keysize; #or Crypt::Cipher::Blowfish::max_keysize;
$c->min_keysize; #or Crypt::Cipher::Blowfish->min_keysize; #or Crypt::Cipher::Blowfish::min_keysize;
$c->default_rounds; #or Crypt::Cipher::Blowfish->default_rounds; #or Crypt::Cipher::Blowfish::default_rounds;
CryptX, Crypt::Cipher
http://en.wikipedia.org/wiki/Blowfish_(cipher)
To install CryptX, copy and paste the appropriate command in to your terminal.
cpanm
cpanm CryptX
CPAN shell
perl -MCPAN -e shell install CryptX
For more information on module installation, please visit the detailed CPAN module installation guide.