my $cipher = Crypt::CBC->new(-key => 'my secret key', -cipher => 'Blowfish'); my $crypted = $cipher->encrypt("blarg!!"); my $text = $cipher->decrypt($crypted); # blarg