Fix random_number() and -m 12 contraints

tools/test.pl

@@ -406,7 +406,7 @@ sub random_number
 
   return if $min > $max;
 
-  return int ((rand ($max - $min)) + $min);
+  return int ((rand (($max + 1) - $min)) + $min);
 }
 
 sub random_bytes

tools/test_modules/m00012.pm

@@ -10,7 +10,7 @@ use warnings;
 
 use Digest::MD5 qw (md5_hex);
 
-sub module_constraints { [[0, 256], [0, 256], [0, 55], [0, 55], [0, 55]] }
+sub module_constraints { [[0, 256], [0, 32], [0, 55], [0, 32], [0, 55]] }
 
 sub module_generate_hash
 {