msnyder@msnyder:~/bin> ./num-to-jp4.pl 6 20
Data Dump:
$VAR1 = {
          '48766' => 1,
          '9732' => 1,
          '33' => 1,
          '66526' => 1,
          '328' => 1,
          '4344' => 1,
          '438' => 1,
          '0' => 1,
          '55' => 1,
          '6' => 1,
          '5148' => 1,
          '182' => 1,
          '3' => 1,
          '46726' => 1,
          '3319' => 1,
          '59' => 1,
          '2851' => 1,
          '652' => 1
        };

randList length: 18
Length numList: 18
18