convert hexadecimal value to encrypted string

linuxfan has asked for the wisdom of the Perl Monks concerning the following question:

Replies are listed 'Best First'.
Re: convert hexadecimal value to encrypted string by Mr. Muskrat (Canon) on Dec 11, 2004 at 02:27 UTC
It's not really solvable with pack or unpack if the string is truly encrypted.	[reply]
Re: convert hexadecimal value to encrypted string by diotalevi (Canon) on Dec 11, 2004 at 02:30 UTC
You'll have to use your encryption software to decrypt the output. How did you encrypt the value in the first place?	[reply]
Re^2: convert hexadecimal value to encrypted string by linuxfan (Beadle) on Dec 11, 2004 at 02:48 UTC
I have an encryption server that encrypts this data and writes this to a table in the database. I can extract data from the database and then send it in a request to the server so that it can give back me the plain text(this is what I am trying to do right now). The data is stored as a hex string in the database table. I want to convert it back to a "regular string" and am unable to find the right conversion string using pack/unpack. I hope this makes my question clearer. Thanks!	[reply]
Re^3: convert hexadecimal value to encrypted string by diotalevi (Canon) on Dec 11, 2004 at 02:50 UTC
You'll need to send the data back to the encryption server and have it decrypt it.	[reply]
Re^4: convert hexadecimal value to encrypted string by linuxfan (Beadle) on Dec 11, 2004 at 03:08 UTC
Re^5: convert hexadecimal value to encrypted string by diotalevi (Canon) on Dec 11, 2004 at 03:11 UTC
Some notes below your chosen depth have not been shown here
Re: convert hexadecimal value to encrypted string by nedals (Deacon) on Dec 11, 2004 at 04:29 UTC
It does not use pack/unpack, but does this return the encrypted string you need? `use strict; $_ = "639D879F224CA2A1BA73CC4884DBD362"; my @hexdata = /(\w{2})/g; my $str = join('', map { chr(hex $_) } @hexdata); print "$str\n";` [download] Maybe, seeing this, someone may be able to give you a pack/unpack solution.	[reply] [d/l]
Re: convert hexadecimal value to encrypted string by Prior Nacre V (Hermit) on Dec 11, 2004 at 02:44 UTC
Your problem may be just nybble order. Try: `pack 'h*', $str;` [download] Regards, PN5	[reply] [d/l]
Re^2: convert hexadecimal value to encrypted string by linuxfan (Beadle) on Dec 11, 2004 at 03:02 UTC
Thanks for your reply. I tried this but it doesn't work for me :(	[reply]
Re: convert hexadecimal value to encrypted string by ikegami (Patriarch) on Dec 11, 2004 at 07:35 UTC
What do you expect the output to be for the string you gave?	[reply]
Re: convert hexadecimal value to encrypted string by exussum0 (Vicar) on Dec 11, 2004 at 13:47 UTC
How did you encrypt it? Whatever you used for encrypting may have a way of decrypting. If this is just a hash value, then you CAN'T get back the encrypted string, but only verify against it by re-encrypting your original string back to the gobbledy gook. ---- Give me strength for today.. I will not talk it away.. Just for a moment.. It will burn through the clouds.. and shine down on me.	[reply]
Re: convert hexadecimal value to encrypted string by melora (Scribe) on Dec 11, 2004 at 21:56 UTC
Here's a hex-to-ASCII thing that I use `$text =~ s/%([a-fA-F0-9][a-fA-F0-9])/pack("C", hex($1))/eg;` [download] That would give you the original encrypted string in ASCII form from the encrypted string in hex form. I'm assuming that each ASCII char is stored as two (ASCII) characters of hex. I don't know if that does what you need... I hope it helps.	[reply] [d/l]
Re: convert hexadecimal value to encrypted string by Anonymous Monk on Dec 11, 2004 at 18:27 UTC
This may sound like a dumb question, but did you assign the result of pack to a string? Or just call pack in void context like you did in your example code?	[reply]


Perl-Sensitive Sunglasses
	PerlMonks