Re^9: convert hexadecimal value to encrypted string

This works for me:

my $cypher1_b64='Y52HnyJMoqG6c8xIhNvTYg==';
my $cypher1=decode_base64($cypher1_b64);

my $cypher2_hex='639D879F224CA2A1BA73CC4884DBD362';
my $cypher2=pack 'H*',$cypher2_hex;

print "ok 1\n" if $cypher1 eq $cypher2;
[download]

-- 
        dakkar - Mobilis in mobile

Most of my code is tested...

Perl is strongly typed, it just has very few types (Dan)

Comment on Re^9: convert hexadecimal value to encrypted string Download Code

Replies are listed 'Best First'.
Re^10: convert hexadecimal value to encrypted string by linuxfan (Beadle) on Dec 13, 2004 at 21:31 UTC
Thanks Dakkar. Exactly what I was looking for. Using this solution I can verify the integrity of the encryption process.	[reply]