在PHP中加密，在Perl中解密

Question

$key = "12345678876543211234567887654321";
$iv = "1234567887654321";
$plaindata = "String to be encrypted.";

$enc = base64_encode(mcrypt_encrypt(MCRYPT_RIJNDAEL_128, $key, $plaindata, MCRYPT_MODE_CBC, $iv));

echo($enc);

输出：

EIZDQJWOIepUeNjFL2wl3RYA5bDmFd05Xu6z4e0aiWQ=

如何在Perl中解密???

Answer 1

您似乎需要MIME::Base64和MCrypt的组合。

Answer 2

cpan中有一个包... MCrypt

http://search.cpan.org/perldoc?MCrypt

检查出来