my $cipher = Crypt::CBC->new( -key => $key, -cipher => $cipher1, -header => 'none', -iv => $keyIV, -literal_key => 1, ); my $encrypted = $cipher->encrypt_hex($plaintext); my $decrypted = $cipher->decrypt_hex($encrypted);