my @two_bits = ($bin_num =~ /(..)/g);

##</code><code>##

my %bits = (
  dd => 0b11000000,
  cc => 0b00110000,
  bb => 0b00001100,
  aa => 0b00000011,
);