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 as 7 bit ascii even parity