Help for this page

Select Code to Download

Select or download this

use Modern::Perl;
use Crypt::CBC;

...

$plaintext = $cipher2->decrypt_hex($ciphertext);
say $plaintext;

Select or download this

$plaintext = $cipher2->decrypt_hex($ciphertext);