$cipher = Crypt::CBC->new( -key    => 'my secret key',
                             -cipher => 'Blowfish',
                             -salt   => 1
                           );