ù my $cipher = Crypt::CBC->new( -key=>'marco', -cipher => 'Rijndael',#-header=>'none', ); my $str= 'e50b672aed16125ec7c66a92dd862d758580ab3ea2b8fd1092d824db07bdb812c5f7e3831e0b9bf5c1796eac20a70aa5814a6bdab7254b954de49475db42b98b'; $str = pack "C*", unpack "(H2)*", $str; my $decrypted = $cipher->decrypt( $str );