Select Code to Download

use strict;
use warnings;

...
}

print "$bits\n@counts";

00000001000000100000001100000100
-7 1 -6 1 -7 2 -5 1 -2