Select Code to Download

use strict;
use warnings;
...
my $bytemap_root = "lookzpM.byte";
my $fname        = $bytemap_root . "-0";
dump_blocks( $fname, 16 );

block 1:
  0 118   0 126   0 126   0 102   0 102   0  94   0  94   0  86
...
 12  14   8   6   4   6   0 126   0 110   0 118   0 118   0 126
  0  78   0  70   0  70   0  94   0 110   0   0   0   0   0   0
  0   0   0   0   0   0   0   0   0   0   0   0   0   0   0   0

#define LAST_CHUNK_IDX_4MB      33554431
#define LAST_CHUNK_IDX_8MB      (33554432*2 - 1)
...
   }
   fclose(fh);
}

#include <emmintrin.h>
#include <smmintrin.h>
...
   }
   return iret;
}

 1  23 105 120  47  93  48 104  16  39: 1000 500 100 50 10   5  734
 1  61  61  73  46 107   4 103 114  54: 1000 500 100 50 10 916    1
...
17  57 107  60 113 117  72  64  56  17: 1000 500 100 50 10 988    1
17 107  81  48  51   8 106   7  62  69: 1000 500 100 50 10 105    1
17 123  66  76  11  24  57  58   7  65: 1000 500 100 50 10   5  974

1: 4
2: 4
...
number of 5 (V) hits found: 35
number of 1 (I) hits found: 35
Ave: 4.60

 1: 64
 3: 58
...
998: 64 *EVEN*
1000: 57 *EVEN*
nhit = 51, nodd=0, neven=51, sum = 3231, min = 43, max = 84, ave=63.35
+29411764706

magic = chr(17)+chr(11)+chr(119)+chr(60)+chr(47)+chr(44)+chr(78)+chr(1
+03)+chr(125)+chr(48)
for r in ["M", "D", "C", "L", "X", "V", "I"]:
  n = hash(r + magic) % 1001
  print r, n

M 1000
D 500
...
X 10
V 5
I 1