Perl converting base64 back to binary

Question

I have a binary string of the form

"000000110111010100110110001010001010110111010110010001111111101010000001"  # for example

to encode to base 64, i use pack and encode_base64

my $base64 = encode_base64 pack 'B*', $binaryString;

Which I would then get.

A3U2KK3WR/qB

I would like to revert back to the original binary form of the string, I tried

my $binString = decode_base64 $base64;

but that returns

u6(��G��

How can i revert back the original binary string?

Looks like your problem needs some unpacking.

i alarmed alien
– i alarmed alien

2014-09-30 19:59:04 +00:00
Commented Sep 30, 2014 at 19:59 — i alarmed alien
– i alarmed alien, Commented Sep 30, 2014 at 19:59
Live demo of the unpacked result.

Miller
– Miller

2014-09-30 20:39:13 +00:00
Commented Sep 30, 2014 at 20:39 — Miller
– Miller, Commented Sep 30, 2014 at 20:39

ikegami · Accepted Answer · 2014-09-30 19:59:00Z

3

The inverse of

my $base64 = encode_base64(pack('B*', $binary));

is

my $binary = unpack('B*', decode_base64($base64));

answered Sep 30, 2014 at 19:59

ikegami

391k17 gold badges291 silver badges555 bronze badges

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

2 Comments

ikegami Over a year ago

Note: I assume length($binary) is always evenly divisible by 8. If its not, there isn't enough information in $base64 to recreate the original string.

Yusuf Ali Over a year ago

thank you, works perfectly, feeling pretty dump that i forgot to unpack

Collectives™ on Stack Overflow

Perl converting base64 back to binary

1 Answer 1

2 Comments

Your Answer

Hot Network Questions

Collectives™ on Stack Overflow

1 Answer 1

2 Comments

Your Answer

Sign up or log in

Post as a guest

Related