Perl hex string to binary string

Question

I'm trying to convert a string of hex digits to a binary string. If my input string is 41424344, then I would want the string to store "ABCD". How can this be done?

Qtax · Accepted Answer · 2012-03-26 16:20:27Z

16

You can do it without using regex with help of pack:

print pack 'H*', '41424344';

Output:

ABCD

answered Mar 26, 2012 at 16:20

Qtax

34k9 gold badges92 silver badges127 bronze badges

Sign up to request clarification or add additional context in comments.

Comments

mob · Accepted Answer · 2012-03-26 16:09:29Z

1

The canonical method is

$input_string =~ s/(..)/chr(hex($1))/ge;

This reads two characters at a time from the input, calling hex (converting a hexidecimal number to a decimal number) and then chr (converting a decimal number to a character) on each input.

answered Mar 26, 2012 at 16:09

mob

119k18 gold badges159 silver badges291 bronze badges

2 Comments

mob Over a year ago

@daxim - Citing anything as canon in Perl risks starting a holy war and I respect your difference of opinion. The CGI module currently uses the .../chr hex $1/ge idiom, but upon further research I find that its technique to unescape HTML has gone through many other incarnations.

brian d foy Over a year ago

Lincoln Stein, the creator of CGI.pm, was anything but canonical. He invented ways of doing things that nobody else would use. :)

Liudvikas Bukys · Accepted Answer · 2012-03-26 16:10:58Z

1

s/([a-f0-9][a-f0-9])/chr(hex($1))/egi;

answered Mar 26, 2012 at 16:10

Liudvikas Bukys

5,8803 gold badges28 silver badges36 bronze badges

Collectives™ on Stack Overflow

Perl hex string to binary string

3 Answers 3

Comments

2 Comments

Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

3 Answers 3

Comments

2 Comments

Comments

Your Answer

Sign up or log in

Post as a guest

Related