Select Code to Download

    my $cipher = Crypt::CBC->new(
        -key => $pass,
        -cipher => 'Blowfish',
        -header => 'randomiv'
    );

    my $ciphertext = $cipher->encrypt_hex($plaintext);
    my $text = $cipher->decrypt_hex($ciphertext);