for my $num (64, 65) {
  my $popped = $num & 1;
  my $left   = $num >> 1;
  print "$left leftover, $popped was popped\n";
}
__OUTPUT__
32 leftover, 0 was popped
32 leftover, 1 was popped