Select Code to Download

$vec = ''; 
$n=-1; 
...
print unpack 'b*', $vec;;
0100100010000100000100000010000000100000000100000000010000000000100000
+000000100000000000010000000000000100000000000000100000000000000010000
+0000000000001000...
# 2  5   9    14    20     27      35       44        54         65   
+       77           90            104            119             135 
+             152

wrog  1: 0
wrog  2: 14
...
wrog  15: 90
wrog  16: 90
wrog  17: 90