Decrypting stuff encoded with PERL CBC

[digirave]

i encrypted quite alot of data using perl using the following:

use CBC;

#encryption routine
#input: text to encrypt
#returns: encrypted text
#returns encryption in HEX
sub gagaec {
my $cipher = new Crypt::CBC($gagakey, $gagaencrypt);
return $cipher->encrypt_hex($_[0]);
}

#decryption routine
#input: text to decrypt
#returns decrypted text
sub gagadc {
my $cipher = new Crypt::CBC($gagakey, $gagaencrypt);
return $cipher->decrypt_hex($_[0]);
}

the problem is i've searched the archives and php.net for info on decrypting using the mcrypt PHP library's but nothing seems to work for me. i suspect i'm screwing up because i'm not handling HEX codes properly

could anyone tell me how the decrypt data encrypted by the perl routines about using php?

i would really appreciate it. i'm getting desperate 🙁
thanks~

[digirave]

oops forgot

my $gagaencrypt = "DES";
my $gagakey = "mydeskey";

[thewitt]

Make sure your PHP implementation supports CBC and DES encryption. Run phpinfo() and check the resulting output.

If you post the actual example PHP code you are using, perhaps that will help as well.

There is a pretty good general example here: http://www.kfu.com/~nsayer/encryption/

-t