i am using a Win32::OLE object that works like this:

my $obj =  lockpan(); //interacts with a vb6 dll
my $enc_data = obj->encryptval($data); //returns binary val
$enc_data = '0x' . unpack('H*', $enc_data); //bin -> hex
#$enc_data is then written to a sql db
[download]

when the code is stored it is stored a 7 bit ascii even parity. so some how perl takes 7 bit ascii and turns it into 7 bit ascii even parity. why and how can i stop this?