Esse programa em Perl é específico para usar com a biblioteca Crypt::DES/IDEA e implementa o modo de encriptação Cipherblock chaining. 