Re^9: convert hexadecimal value to encrypted string

in reply to Re^8: convert hexadecimal value to encrypted string
in thread 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)

In Section Seekers of Perl Wisdom