8 ($c=SSLeay::Cipher::new("idea")) ||
9 die "'des' is an unknown cipher algorithm\n";
11 printf "name =%s\n" ,$c->name();
12 printf "key length=%2d\n",$c->key_length();
13 printf "iv length =%2d\n",$c->iv_length();
14 printf "block size=%2d\n",$c->block_size();
17 $c->init("01234567","abcdefgh",1);
18 $in=$c->update($data);
21 $c->init("01234567","abcdefgh",0);