Select Code to Download

use Crypt::CBC;

...
);

my $cipher_text = $cipher->encrypt($plain_text);

#!/usr/bin/perl

...
Blowfish encryption is used, with proper salting and chaining.

=cut