Beefy Boxes and Bandwidth Generously Provided by pair Networks
good chemistry is complicated,
and a little bit messy -LW

Re: Simple Crypt::CBC Sample?

by naChoZ (Curate)
on Feb 14, 2013 at 22:24 UTC ( #1018807=note: print w/replies, xml ) Need Help??

in reply to Simple Crypt::CBC Sample?

Instead of letting Crypt::CBC try and figure out a cipher on its own (where it's clearly picking 'Random' as the cipher you want to use in this case), you can specify one yourself...

my $cipher = Crypt::CBC->new( -key => $key, cipher => 'Rijndael' );

That will cause it to use Crypt::Rijndael for the cipher.