Hello all,
I have been looking all over for a method to take an encrypted string produced by the RijndaelManaged class (in .net framework) and decrypt it in perl.

I have the IV and Key and the method that the string was built, but I don't know (and haven't looked into the .net source as of yet) how the class handles the iv and key.

For Example:

use strict;
use Crypt::Rijndael;

my $key = "qwertyuiopllkjhgfdsa"; 
my $iv = “mnbvcxzasdfghjkloiuy";
my $rcipher = Crypt::Rijndael->new ($key, Crypt::Rijndael::MODE_CBC())
+;
$rcipher->set_iv($iv); 

my $encrypt_string = “STRING_PULLED_FROM_FILE”;
my $plain_text = $rcipher->decrypt($encrypt_string);
[download]

Now,

The above does not work because it is lacking the information that I need, in this case the method to covert the IV to a block size of 16 bytes and the method to covert the Key to the same method utilized by the RijndaelManaged class.

Currently, I use Crypt::Rijndael and/or Crypt::CBC (both decrypt and encrypt) in other perl code with the following (based on my example above).

use strict;
use Crypt::Rijndael;
use Digest::MD5 qw(md5 md5_hex);

my $key = "qwertyuiopllkjhgfdsa"; 
my $iv = “mnbvcxzasdfghjkloiuy";

$key = md5_hex $key;
$iv = md5 $iv;

my $rcipher = Crypt::Rijndael->new ($key, Crypt::Rijndael::MODE_CBC())
+;
$rcipher->set_iv($iv); 

my $data = “PLAINTEXT_TOBE_ENC”;
my $encrypt_string = $rcipher->encrypt($data);
my $plain_text = $rcipher->decrypt($encrypt_string);
[download]

Does anyone know the correct method to do the same with a string encrypted with RijndaelManaged?

I can provide more specific code if need, please let me know if you can help.